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JANUS/Ada 

$99.95!! 



PRESENTING THE NEW 
JANUS/Ada C-PAKH 



1. 
2. 
3. 
4. 



Janus/Ada Compiler 

Janus /Ada Linker 

Janus /Ada Libraries 

Janus/Ada Example/ 

Programs 

Janus /Ada User Manual 



AND THESE ADDED 
FEATURES!! 

1. Free User's Group 

2. $99.95 Discount on 
the Janus/Ada D-Pak 

3. No License!! 

4. No Copy Protection!!! 

5. Customer tested for 
over 3 years!!! 



This is the introductory Ada™ package you've been waiting 
for. . . over three years of actual field use, specifically on 
microcomputers, by the government, Fortune 500 businesses 
and major universities. Realistically priced, at $99.95. so you 
can afford the most popular Ada implementation used on 
microcomputers! 

The new "C"-Pak is available for most microcomputers 
running MS-DOS, including the IBM PC AT™, as are all the 
other fine Janus/Ada programs. Call us or an authorized 
distributor for your copy today! 



National Distributors 


International Distributors 


Westico. Inc. ASH II A. O.K. Computers 


Ada Australia 


Progesco 


25 VanZanlSt. 7407 Marisol 816 Easley St., Suite 615 


218 LutwycheRd 


155, rue du Faubourg 


Norwalk, CT 06855 Houston. TX 77083 Silver Springs, MD 20910 


Windsor 4030 


St. -Denis 


(203)853-6880 (713)933-1828 (301)588-8446 


QLD. Australia 


75010 Paris 




(07) 57 9997 


France 

(1) 205.39. 47 


Trinity Solutions Microprogramming. Inc. 


Lifeboat. Inc. 


Japan 


5340 Thortuvood Dr.. Suite 102 P.O. Box 3356 


3-6. Kando-N 


shikicho 


San Jose, CA 95123 Chatsworlh. CA 91313 


Chiyoda-ku 




(408)226-0170 (818)993-6475 


Tokyo 101. JAPAN 




03-293-4711 
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Software development isn't a 
mountainous task once you 
eliminate the high C errors. 



When you can find and fix hugs at 
the earliest possible moment, creating 
software stops being such an uphill grind. 

And the Smart/G Environment makes 
it possible. It's a complete, fully-integrated 
development environment for C that saves 
you from the creativity-inhibiting qxle 
of edit, compile, re-edit, re-compile, link, 
load, test, re-edit, re-compile, etc., ad 
infinitum. Smart/C puts the fun back in 
programming, because you spend your 
time creating... not waiting. 

Here's why. Syntax errors are elimi- 
nated automatically as code is entered. 
Smarl/C's highly integrated editor and 
interpreter allow you to interpret your pro- 
gram at any time in the creation process, so 
logic errors can be ferreted out as soon as 
the algorithm exists — long before any 
compile, link, or load. 

The complete integration of the edi- 
tor and interpreter means you can stop 
anywhere in the interpret cycle, edit, and 
then go right back into the interpreter 
exactly where you left off. Not only that, 
the screen-oriented user interface lets you 
see all operations, even interpretation, 
right on the listing of the code. 



And to make maintenance program 
ming easier, Smart/C's Migrator allows 
existing C code produced with any editor 
to be modified and run within the Smart/C 
Environment. 

All of which makes Smart/C an excel- 
lent tool. It's flexible, non-restrictive, and 
lets you create elegant, readable, error- 
free programs that you can watch run with 
a great feeling of satisfaction. 




Smart/C 

Free 
Demo Disk! 



To full) appreciate Smart/C, you have to see it in 
action, for your free IBM PC MS-DOS demo disk, call 
us, Or write us on your company letterhead, 
AGS Computers, Inc., Advanced Products Division, 

1139 Spruce Drive. Mountainside, NJ 07092. 
800-AGS-1313. In NJ. 201-654-4321. 



Smart/C Features 

The Smari/C Environment 

□ Fully integrated editor ami interpreter 
n Only one load brings them both in 

□ One command set 

o Move between one another at will 

Syntax Directed Editor 

□ vi-like command set 

n Automatically provides formats for blocks, for. 

case and //statements 
Interpreter 
Q Current module can call external modules during 

interpretation 
o Has Include capability 

□ Totally precompitation— no incremental compile 

□ Can interpret partially defined files allowing for 
rapid prototyping 

□ Variable speed of interpretation 

□ Multiple windows with user-defined sizes 
The Smart/C Migrator 

□ Allows C code produced with any editor to he 
interpreteil by Smart/C 

□ Reformats for readability 

Smart/C has been purled to UNIX" System V Release 2, 
Berkeley 4.2, Xenix," and MS-DOS, Versions run on 
8086- and 68000-based machines, as well as proprie- 
tary architectures, Smart/C runs on PCs, micros, 
supermicros, minis, and even mainframes. 

Tndimirks— Srmrr/C ACS Cempulm, Inc 1M.\ KKt Bdl UbS: 
Xenix and MS-DOS: Microsoft Corp. IBM PC: IBM Corp. 



DIT 
COMPILE 



AGS 
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Chpp- 



$ dBASE III users 



time to do more. 



Clipper'" allows you 
to run all dBASE III'" 
programs 2 to 20 limes 
faster than they do 
with the standard 
dBASE interpreter. 

That frees up extra 
time you're wasting if 
you're running dBASE III 
programs without 
Clipper. 

Extra time to think. 
To create. To produce. 
To use as you choose. 

You see, Clipper is 
the first true compiler 
for dBASE III. Clipper 
eliminates the time- 
consuming translation 
which the dBASE inter- 
preter performs line 
after line whenever a 
program is run. 



With Clipper, once 
you've debugged your 
source code, it's com- 
piled into more effi- 
cient machine code. 

And Clipper com- 
piles all your dBASE 111 
programs. The ones 
you have today. The 
ones you' II have 
tomorrow. But don't 
wait until tomorrow 
to order Clipper. 

Today, Clipper has 
already been pur- 
chased to speed up 
dBASE run time at 3M 
and Touche Ross. At 
Exxon and NASA, in 



the Harvard Physics 
Department. For the 
State o! Arizona 
and TRW. 

And that's just a few 
of the installations 
worldwide. From 
Greece to Venezuela 
to Canada to Europe. 

So stop wasting time. 

Ccill our loll-free 800 
number and get Clipper. 



You'll spend less 
time running dBASE 111 
and more lime running 
the rest ol your life. 



m Nantucket 



5995 S. Sepulveda Blvd., Culver City, CA 90230 (800) 556-1234 ext. 225 In California (800) 441 -2345 ext. 225 
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ARTICLES 



Forth: Twithe Curthed, too! 

by Jean-Pierre Schachter 

Recursion is often an attractive alternative to iteration, especially in 
cases where the original task can be broken down into a finite set of 
smaller, similar tasks. While some implementations of Forth have 
recursive control structures built in, many do not. This article presents 
a method for adding recursion to Forth by taking advantage of Forth's 
inherent extensibility, thereby allowing Forth programmers the same 
recursive powers that were built into C and LISP. 

Porting the UNIX Utilities 

by Alan Filipski 

UNIX system utilities are commonly dismissed as being source-code 
portable since they were written in the C language. As a general state- 
ment, this is true, but there are exceptions. Filipski describes the hurdles 
he and a team of coworkers had to ieap when converting U N IX System 
V utilities from a VAX to an M68000-based computer. 

Symphony Command Language 

by Darryl Rubin 

Many top-selling programs owe their success to their user program- 
mability. With the new breed of integrated programs like Lotus's 
Symphony, an embedded language can do more than create macros- 
it can offer a complete development environment. This article presents 
the Symphony Command Language and describes some interesting 
macros you can use right away. 

Getting to Know PL/I 

by Gary Sarlf 

Compared to the lean elegance of Pascal, PL/I is considered by some 
purists of language design to be a monstrosity. But PL/I is a quite useful 
and powerful language for business and scientific languages. In this 
article we explore the philosophy and feel of PL/I and study its strengths 
and limitations. 
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Professional Pascal 

Smaller & Faster oode A 
Plus 22 reasons 
for not us'm 
Microsoft 
Pascal 



m 





The List: 




Compile Time 

Symbol table space limited only by available 

memory 
Cross referencer 
ANSI-standard checking 
Option to search a list ot directions to find any 

input tile 
Source interleaved with Object in Object listing 
Full Intel OMF Line /Symbol /Type records for 

debugger 
Run Time 
Code quality 
Five models ot memory on the 8086: small, 

medium, compact, big and large 
Code produced suitable for ROM 
Expressions 

Long/short integer mixes 
Set constant expressions 
Set elements in the range-2 J '..2 J '-1 or 0.256 
Type casts 

II = Concat for concatenation of all strings 
Statements 

Iterators (for data abstraction from CLU) 
Assignment to string variables of differing lengths 
Declarations 

Otherwise (or else) in record declarations 
Intrinsics 
Readln(X:M) 
Inc. Dec, Incl, Decl, from Modula-2 

Data Types fekda^ifll 
Comparison (for equality) of record or array types 
The value- 32768 allowed as an integer 
Maximum size of a data structure on the 8086 

Inlormalion on Microsoft Pascal oblainad Jrom the 1964 
release 3 2 priming ol the MS manual 



Microsoft has a problem. 
The 22 features listed above 
are missing from MS Pascal. 



Microtec Research has the answer. 
Professional Pascal. 

Professional Pascal is more than just 
powerlut teatures. It generates the 
most efficient code you've ever seen 
for 8086/8087/8088/186/188/ 
286/287 in 5 memory models. 

Actually 35 positive differences 
exist in our favor. 

In a direct comparison - 
there isn't any! 



We're Functional and Fast 

and Serious about our 

products. We've been providi ig flexible 

and economical solutions lor software 

developers since 1974. 

Beginning with product cone ;pf, 
through development, quality assurance, 
and post-sales support - Qui lity. 
Compatibility and Service ar i the 
differences which set Microti c 
Research apart from others. 

if you're a serious software developer, 
shopping for software develooment tools, 
call or write today lor more it formation. 
800-551-5554 In CA cat! (40 ij 733-2919 



MICROTEC® 
RESEARCH 

3930 Freedom Circle. Suite 101. Sanla Clara. CA 95054 Mailing Address: P.O. Box 60337. Sunnyvale. CA 94088 



Professional Pascal is a trademark ol MelaWere. Inc. 



Miciotac is a regrsleiod ffademai* of Micfolec flesearcfi, Inc. 



No matter what Pascal or chip you choose, 
recompile with the tully compatible, 
across all implementations. 
Professional Pascal. 

We were never accused ol humility - only 
solid software development toots. 
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Microsoft rs a iegjslored trademark ol Microsoft 1 Corporation. 



Publisher's 
Notes 
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his month's 
COMPUTER 
LANGUAGE 'is a 
bit of a novelty in computer publishing 
today — it is not a special issue. It has no 
special theme or specific product wrap- 
up. Wc feci it is a refreshing change to 
be able to offer you a wide variety of sub- 
jects. 

The reader response we've received 
about our theme product wrap-ups cov- 
ering C, COBOL, and BASIC has been 
very positive. This format allows us to 
cover the maximum amount of products in 
a fair comparison. Unfortunately, we can- 
not go into depth on each product as we do 
this month with four individual reviews. 
Which approach to product reviews is 
most useful to you? 

COMPUTER LANGUAGE has cele- 
brated an anniversary of sorts. We 
exhibited at the West Coast Computer 
Faire for the second time. This year was 
quite different than last for us. Last year 
we snuck into the show and shared a booth 
with another exhibitor. We had no money 
and just an idea for a magazine, Fortu- 
nately some terribly trusting people 
bought subscriptions. 

This year wc actually had magazines 
and they sold like hot cakes. The Faire 
was an incredible amount of fun and gave 
us a chance to meet many loyal readers 
face to face. 

We mention this show because it really 
is the only major trade show that still 
caters to the programmer. Many of the 
old-time exhibitors complained about the 



new show management and location. But 
you've got to expect changes after eight 
years. No one ever said progress is for the 
better. Hey, any computer show where the 
number of people walking around in jeans 
outnumbers the people in three-piece blue 
suits can't be all bad. 

The initial reaction to the COMPUTER 
LANGUAGE C Seminar in Cambridge, 
Mass., has been fantastic. We've received 
a great many reservations after officially 
announcing it just a month ago, Reserve 
your space today and save $100 off the 
registration price by signing up by June 
30th. See page 93 for details. 

And now for this month's potpourri of 
articles. Jean-Pierre Schachter's "Forth: 
Twithc Curthed, too," shows that Forth 
can be given the same recursive power as 
LISP and C. "Porting the UNIX Util- 
ities," Alan Filipski's third article for 
COMPUTER LANGUAGE, discusses the 
problems the author encountered when 
porting UNIX utilities from a VAX to an 
M68000-based system. 

"Symphony Command Language" by 
Darryl Rubin, another popular 
COMPUTER LANGUAGE author, covers 
Symphony, Lotus's combination 
spreadsheet, data base, word processor, 
graphics, and communications package. 
Gary Sarff's "Getting to Know PL/I" 
provides insight into this powerful but not 
always well-known language. 

Our usual departments also cover a 
wide range of topics — from B-trees to 
copy protection, the exotic language 
COMAL to an interview with MODEM7 
creator Ward Christensen, and more. 





Carl Landau 
Publisher 



Telecommunicate to COMPUTER LANGUAGE 

COMPUTER LANGUAGE has established two bulletin board systems for you to 
upload and download text and binary programs, as well as to leave your own elec- 
tronic Letter to the Editor. All the program listings referred to in every issue of the 
magazine will be available here. 

For those readers without access to a modem who desire a copy of program listings 
referred to but not printed in an issue, send $5 to COMPUTER LANGUAGE , attention: 
Listings Dept., 131 TownsendSt., San Francisco, Calif. 94107. We will mail you a 
copy of all the listings not printed in this issue. 

In addition, COMPUTER LANGUAGE has its own Special Interest Group on Com- 
puServe's national data base. After calling into your local CompuServe node, simply 
type "GO CLM" at any prompt and you'll be in our SIG. 

To access our bulletin board, set your computer or terminal to the following param- 
eters: 8 data bits, no parity, 1 stop bit, full duplex, and either 300 or 1200 baud. The 
telephone number is (415) 957-9370. After your modem makes the connection, type 
RETURN several times, and everything else is easy. 

Both systems are open 24 hours per day, 7 days per week. Due to the heavy number 
of callers, please do not log into the system more than one time per day. Messages left 
on either system will be combined the following day. 
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Borland Does It Again: 
SuperKey $69.95 



Sure, ProKey™ is a nice little program. But when the people who brought you 

Turbo Pascal and SideKick get serious about keyboard enhancers, you can 

expect the impossible ... and we deliver. 



SuperKey 



ProKey 



ALL FEATURES RESIDENT IN RAM AT ALL TIMES 



RESIDENT PULL-DOWN MACRO EDITOR 



RESIDENT FILE ENCRYPTION 



PROKEY COMPATIBILITY 



DISPLAY PROTECTION 



ABILITY TO IMPORT DATA FROM SCREEN 



PULL-DOWN MENU USER INTERFACE 



CONTEXT-SENSITIVE ON-LINE HELP SYSTEM 



DISPLAY-ONLY MACRO CREATION 



ENTRY AND FORMAT CONTROL IN DATA FIELDS 



COMMAND KEYS REDEFINABLE "ON THE FLY" 




PRICE 



Sorry ProKey 



Superb software at reasonable prices! 1 

There is much more to SuperKey. Maybe the best 1 

reason to buy SuperKey is that it is a Borland 
International Product. Each one of our products 
is the best in its category. We only believe in 
absolutely superb software at reasonable prices! 

An offer you can't refuse. 

Whether you are a ProKey user or you've never used a 
keyboard enhancer before, your boat has come in. You can 
get your copy of SuperKey at this irresistible price. 

Get your PC a SuperKey today! 

SuperKey is available now for your IBM PC, XT, AT, jr. and truly 
compatible microcomputers. 



Total ProKey compatibility. Every Prokey Macro file may be 
used by SuperKey without change so that you may capitalize on 
all the precious time you've invested. 

Now your PC can keep a secret! SuperKey includes a resident 
file encryption system that uses your password to encrypt and 
decrypt files, even while running other programs. Two different 
encryption modes are offered: 

1. Direct overwrite encryption (which leaves the file size un- 
changed) for complete protection. At no point is a second file 
that could be reconstructed by an intruder generated. Without 
your secret password, no one will ever be able to type out your 
confidential letters again! 

2. COM or EXE file encryption which allows you to encrypt a 
binary file into an ASCII file, transmit it through a phone line as a 
text file and turn it back again into an executable file on the 
target machine (only of course if your correspondent knows the 
secret password!). Now, you will even be able to secretly ex- 
change programs through Public Bulletin Board Systems or 
services such as CompuServe. 

Totally memory resident at all times, gives SuperKey the ability 
to create, edit, save and even recall new or existing macro files 
anytime, even while running another program. 

Pull down macro editor. Finally, a sensible way to create, edit, 
change and alter existing macro definitions. Even while using 
another application, a simple keystroke instantly opens a 
wordprocessor-like window where you're allowed to see, 
edit, delete, save and even attach names to an indi- 
vidual macro or file of macros, and 
much more. 



WM 



Availa^ at -r orde r by 
B a^t you- To 



B ,^s^ ooa 



YES'P |eaSerU nS 

Superb »*» 
5 p c e nd me 
Se copi^ 



t 



BORIPHD 

INTERNATIONAL 



Softwares Newest Direction 

4585 Sams Valley Drive 
Scotts Valley, & $5066 

ulex mm 
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tVIIKN YOU MULI) A HOUSE . . . YOU MINT NKKI) TO MAKK THK WINDOWS VOtlltSKI.F. NOW . . . TIIH SAME IS TBI IK WIIKN VOI NIK WIUTINt; CODE. 



Windows With A View 
Toward The Future 

The Window 
Machine" occupies 
only 12K! Writlen in 
tight, fast Assembler, 
it performs like a 
racing engine. ..with 
more power than 
you'll probably ever 
need. Yet, it's an 
engine designed to fit 
in the vehicle of 
your choice... from a 
"stripped-down" 
128K IBM PC to a 
fully loaded AT. Tin- 
programs you wrile 
today will run on 
the broadest range of 
machines possible... 
now, and in the 
future. 

Windows Bigger 
Than Your Screen? 

Here's where the 
VSI part of our name 
fits in. VSI means 
Virtual Screen Inter- 
face. Behind each 
window, there's a 
much bigger picture. 
VSI defines virtual 
screens rather than just windows. The 
window itself shows whatever portion of 
its virtual screen you wish to exhibit at 
any given point in your program. Each 
screen can be up to 128 x 255 (columns x 
rows, or rows x columns). And there are 
more than 100 screen primitives at your 
command. 

Multilingual Windows 

You can order The Window Machine 
with the language interface of your choice: 
C, Pascal, Compiled Basic, Fortran, Cobol, 
or PI.l. We've even recently completed 



These ore 
coders' 
windows... 
designed to be 
built into the 
programs you 
are writing. 
They con 
overlap, move 
anywhere on 
the screen, 
grow, shrink, 
vanish orb/ink. 
They can be 
bordered in 
anything from 
a simple line to 
/lashing 
asterisks... or 
even no border 
at all. And 
you can have 
up to 255 of 
them at a time! 
Color or 
monochrome 
...of course.' 



Why did Simon & 
Schuster, 3Com, 
Tymshare, and 
Revlon choose 
VSI-The Window 



figured if you wanted ribbons and bows 
you could always add them yourself.) 

And by offering vou the product our- 
selves, we were able to cut out all the 
middlemen and save you a tremendous 
amount of money. 



VSI 



THE WINDOW 

MACHINE 



Avaitahk fur I hi; IBM PC. XT. AT. IBM Compatibles, 
Wring. T.J..and HP 150 

The Window Machine Includes: 



(and how corneal 
you can buy it for 
such a low price?' 



$59.95 




> Zoom Windows 
i Multiple Virlurii 1 
Screens (up to 2S5J 
i Choice of Borders 
(including flashing bordersj 
i Support for all Color and 
Monochrome Video Attributes 
(no graphics cord required) 
i Built-in Diagnostics 
And much, much more 



ORDER YOUR COPY OF 
VSI— THE WINDOW MACHINE TODAY 
For Visa & MasterCard orders call toll free: 
800.536-8157 Ext. BZ4 In CA 600-672-3470 Ext. 824 

Cull Mon.-Fri. 6A.M. Id 12P.M., Sat. A Sun. 6A.M. la 6P.M. |P.S.T.) 



an interface for Turbo Pascal*, so that 
now true, full-featured windowing can be 
utilized with this fine compiler. (Turbo's 
own built-in "windowing" procedure is 
extremely limited). 

Windows That Won't Break You 

We decided lo save you a lot of money. 
So, we left behind fancy binders, mono- 
grammed slip cases and plastic pre- 
sentation boxes. Instead, you'll find an 
extremely powerful tool and a 200 page 
manual written with an eye toward 
simplicity, clarity and completeness. (We 
"Turbo Pascal is a Trademark aj Borland Inlsrnalkinnl 
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FEEDBACK 




Just what doc ordered? 

Dear Editor: 

I was most interested to read Peter 
Recce's article on APT {COMPUTER 
LANGUAGE. Apr. 1985, pp. 43-55). As a 
novice (barely) Forth and LISP program- 
mer, I am intrigued by the thought of a 
language that combines constructs of both 
of these. I was also quite interested to see 
the medical examples. Has the author 
been involved in artificial intelligence 
applications in the medical field? As a 
physician and computer enthusiast. I have 
been most interested in this area, and I 
would greatly appreciate the chance to 
look at APT when the language is 
available. 

Zachary T. Bloomgatden, M.D. 
New York, N. ¥. 



Anxious for APT 

Dear Editor: 

I am inquiring as to the progress and 
availability of the APT language. Though 
I am no computer genius. I do have a 
knack for getting the obstinate machine to 
do what I want. Having programmed 
applications primarily in BASIC, with 
some work in APL, I have been looking 
for a more suitable tool for my 
applications — instructional software mak- 
ing extensive use of graphics. 

Any information regarding APT, its 
availability, documentation, and costs 
would be greatly appreciated. If APT is as 
good as it appears, I may want to use it for 
all of my programming needs. I can't 
wait. 

Eii Dickerson 
Garrison, Iowa 

Author Peter Reece responds: Yes, I have 
been involved in artificial intelligence in 
the medical field — specifically, working on 
the creation of artificial ears from an AI 
point of view, 

1 hope to have APT available (at mini- 
mum cost) on disks for the IBM PC in 
about six months. Because I am expanding 
the language— including adding quite 
sophisticated windowing and expanded AI 
capabilities — I feel some reluctance about 
releasing the Radio Shack version at this 
time. I also want to make sure there is a 
proper manual and adequate 
documentation. 



If you are interested in corresponding 
further on APT or in acquiring the lan- 
guage when it is available, please write to 
me, Peter Reece, do COMPUTER 
LANGUAGE, 131 Townsend St. , San 
Francisco, Calif. 94107. 

Also, because 1 have found out that 
another company is using the name APT, 
the language has been renamed RAPT. 



A simple sort 

Dear Editor: 

"Sorting by Dispersion" by David Kcil 
{COMPUTER LANGUAGE, Apr. 1985. 
pp. 27-32) recalled a simple (minded) sort 
algorithm that occurred to me lately. It 
must have been noted somewhere before, 
but there will be no rush lo take credit. 
Since it can be described shortly over the 
telephone, perhaps it should be called 
Telephone Sort— or perhaps just Simple 
Sort. 

Given an array of elements A(l :m) , 
indexes i and./' , and a counter c, proceed 
as is shown in Listing 1 . This takes m 1 
comparisons and m interchanges. 
Attempts to improve it mutate it into more 
familiar algorithms. 

The only advantage I know is that the 
inner loop can be realized with a single 
instruction on some array processors and, 
of course, could be easily microcoded. 
And it might be useful in programming 
over the telephone without a modem. 

M.B. Clausing 
Syosset, N. Y 



A transnational KISS '^-^ 

Dear Editor: ' ~"-~0> 

As a recent subscriber, I was taken 
aback by Namir Shammas's new language 
project. Who on earth needs yet another 



for i := 1 to m do 
begin 

c := 1; 

for j :=1 to m do 

if A(i) > A(j) then c := c + 1; 

A(e) :=: A(i) (* interchange A(c) and A(i] 
end 



computer language? But on second 
thought, every computernik worth his salt 
must have at least one compiler and one 
language to his credit. So why not take all 
these great ideas and pick the best nuggets 
from them all— something worthwhile 
might result after all. 

My own contribution is a minimal lan- 
guage called KISS (no, the second S 
stands for Sir or Sister, as the case may 
be). The language uses no key words and 
is therefore truly transnational. Here is 
the instructional manual: 

() begin end 
[X| absolute value of X 
•> X getX 
<- X put X 

@ any permissible value 
?E proceed if E is true 
! N repeat N times 

The loop statement IN is a default form 
for .' cl, c2 ... N, where cl is the first 
counter value, c2~cl the increment, and 
Wthe inclusive limit. Thus, if N=IO, IN, 
N-3 . . . would execute for N= 10, 7, 4, 
and / . This simple construct includes all 
the popular loops but never leaves a doubt 
about its exact meaning. 

Similarly, ? E encompasses if/then/ 
else , as in 

?P<10: .... 
= @: .... 

as well as the case construct: 

?L= 'A': .... 
= 'B' : .... 
= 'C: .... 



Listing 1. 



POWER! SPEED! VERSATILITY 
Rrady Book Tools 



Put You on the Cutting Edge of 
Computer Language Technology! 




UNIX and XENIX: 
A Step-By-Siep Guide 

Doug/as W. Topham and 
Hai Van 7'ruong 

Get your copy of this main 
selection of the Small Com- 
puter Book Club (March '851! 
Written for ihose using 16 
hit microcomputers, this unique step-by-step 
guide gives you everything from the basic set- 
up of UNIX to advanced techniques for 
customizing the UNIX system. Covers UNIX 
commands, the C Shell, the Visual Editor, text- 
processing tools, and the Bourne Shell! 
1985/S08pp/paper/D9 187-8/S2 1.95 

The C Programming 
Tutor Leon A. Wortman and 
Thomas O, Sidebottom 

An introductory, "learn by 
doing" book that explores the 
inner workings of the C 
language and lets you create 
compact, transportable, fast- 
running programs quickly. You'll work with an 
abundance of programming examples and Irani 
how to write useful, complex, multi-function 
applications programs as well ;is simple and 
valuable utilities. 
1984/374pp/paper/D3642-8/S19.95 

Your Books Can Be Ordinary 
Or They Can Be Brady. 





| BRADY 

Brady Communications Co., Inc. 

A Pmntice-Hall Publishing Company 

Bowie, Maryland 20715 

Toll-FHEE (8O0) B3&O220 In MD (3011 262*300 



ORDER 
TODAY! 




YES! 



The C Programmer's 
Handbook Thorn Hogarc 

Now you can readily find 
clear, complete information 
on all the important features 
of the C language! This 
definitive desktop reference 
is vour aid in day-to-day pro- 
gramming and covers a wealth of information 
about C compilers, including documentation, 
examples, restrictions and defaults. Gives you 
to-lhe-point information nlxuit compiler-specific 
functions, operating system requirements, and 
much more! 
19B4/288pp/paper/D3630-l/$19.95 

Mastering FORTH 

Anita Anderson and 
Martin '/racy, iV/icroAfotion 

Here's a step-by-slep 
tutorial to this powerful 
high-level, stack-oriented 
computer language! Gives 
you instruction on each of 
the commands required by the PORTH-83 In- 
ternational Standard, plus utilities and exten- 
sions that can be written within the Standard. 
Complete tliscussions on stack manipulation, 
variables, loops, strings, compiling words, and 
more! 19S4/216pp/paper/D6609-4/S17.9S 

8086/88 Assembly 
Language Programming 

Leo J. Scanlon 

Now you can develop 
assembly language programs 
for any microcomputer using 
an 808G or 8088 
microprocessor! With tliis 
comprehensive text, you get a complete discus- 
sion of assemblers in general, plus a complete 
introduction to ASM-86, instructions for the 
8086/88 assemblers, a concise introduction to 
the 8087 Numeric Data Processor, plus many 
useful programs, tables, and illusU'ations. 
1984/213pp/paper/D424X-5/$15.9S 





1 want to be on the cutting edge of computer language technology. ' 

Please send me the following maximum-performance book tools: , 

□ UNIX and XENIX: A Step-byStep Guide EThe C Programming Tutor D3642-8IS 19.95 
091 87-BJS2 1 .95 □ Mastering FORTH D6B094I5 1 7.95 

OThe C Programmer's Handbook D36 50-1 (SI 9.95 8DBBI8B Assembly Language Programming 

Please indicate payment optien: D424X-515 1 5.95 

□ My check or money order is enclosed. Do not charge me for postage and handing. I have added state sales tax. 
nBil me. I agree to honor the invoice for the above checked products, which includes postage, handing and slate sales tax. 
□VISA oMasterCard I agree to pay postage, handling, and state sales tax. 

Card Number Expiration Date 

Signature _ 
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The lack of key words permits total 
freedom in choosing names for variables 
and functions: it also helps the compiler. 
By setting a declaration like ABC: @, the 
function call simply degenerates into a 
label. 

The rest of the notation and the basic 
math functions are commonplace, so the 
reader should have no problem translating 
the following example into any other 
language: 

N: -9... +9 

X: -99. 99... 99. 99 

Y:@.@ 

IN:@ 

OUT:<- 'YEXPN =',Y; 
(<- 'ENTER X,N AFTER >>' 
IN: <- '>>'; 

-> X,N; 
Y:= 1.0 

(?N = 0:OUT) 
(!N 

Y:= Y*X) 
(?N<0: 

Y: = 1/Y) 
OUT; 

IN) 

My apologies for not having an ASCII 
keyboard available at this time; it makes 
the code look a little rough. But the idea 
does come across, I hope. 

Dr. Max Schiiuilcr 
Boonson, N.J. 




Language dreams 

Dear Editor: 

I would like to point out another minor 
slight of APL, this time by John Snyder in 
"Recursive Procedures." {COMPUTER 
LANGUAGE, Apr. 1985, pp. 19-24.) 
Recursion has been an important feature 
of APL right from the start, and I would 
certainly call APL one of the popular 
languages. 

Having programmed extensively in 
FORTRAN. APL. PL/1, and C. my two 
favorite languages are APL and C. I hope 
your new language project seriously con- 
siders including the best features of these 
two languages. 

It has interested me to discover the 
number of features APL and C already 
have in common. Those that come to mind 
readily are short names, recursion, 
embedded assignment, passing argument 
by value, modularity andextendibility 
through user-defined functions, pro- 
cessing at the bit level, funny symbols, a 
high degree of portability, zero origin for 



indexing (optional in APL), the same syn- 
tax for labels, double floating arithmetic, 
automatic conversion of types as neces- 
sary to perform arithmetic, rowwise stor- 
age of arrays, simplicity of I/O without 
JCL, and continuing evolution. 

While C is a hodgepodge, APL has an 
elegant simplicity and consistency of syn- 
tax that should be studied as a model for 
any new language. By having the same 
simple syntax rules for both user-defined 
and primitive functions, as well as 
straightforward right-to-lcft processing, 
there are no ambiguities nr complicated 
tables of rules that need to be memorized 
or kept handy for reference. To me, this is 
what any new language should strive for 
while still trying to attain the versatility 
and richness found in both languages. The 
convenience of an interactive program- 
ming and debugging environment is also 
important. 

From C should come the features that 
make it compilable without being over- 
bearing and its structured flow control. 
Wc might as well use C's funny symbols 
and eliminate one of APL's handicaps 
also. Beyond this I haven't thought it 
through to its logical conclusions, so 
haven't anticipated what problems might 
be encountered, but I can dream, can't I? 

Bob Siephtm 
Monterey, Calif. 



BASIC benchmarks 

BASIC benchmark texts (Tables I and 2) 
were inadvertently omitted from last 
month '.v BASIC wrap-up. We're sorry for 
any frustration that may have occurred due 
to this error. — Ed.- 



Table 1 

Benchmark tests for BASIC compilers (min: sec) 



Benchmark tests for BASIC 


interpreters (min: sec) 




Manufacturer and 
Product 


Sieve test 


Mysort 


Matrix 


Trig 

sin{ ) 


test 
eos() 


MS-DOS interpreters 












American Planning 
Corp.MEGABASIC 


14:10 


1:22 


0:49 


4:53 


3:54 


Control-C 
BASIC Interpreter 


error 


7:58 


6:03 


— 


— 


IBM/Microsoft BASICA 


36:30 


2:57 


2:06 


3:32 


4:17 


Microsoft MS-BASIC 5.28 


39:49 


3.07 


2:04 


3:21 


4:05 


Morgan Computing 
Professional BASIC 


18:45 


2:03 


2:21 

1:40* 


12:56 
0:36* 


12:57 

0:36* 


Ryan-McFarland 
RM-BASIC 


13:54 


1:17 


1:52 


10:45 


10:57 


Southwest Data 
Pluto BASIC 


error 


error 


error 


5:12 


5:12 


Summit Software 
Better BASIC 


6:40 


0:44 


0:55 


5:31 


5:33 


TransERATBASIC 


32:00 


3:00 


2:25 


2:28 


2:28 


True BASIC 
WATCOM BASIC 


4:21 
55:58 


0:55 


0:39 


1:31 

5:17 
1:42* 


1:49 

5:19 
1:42* 


4:26 


2:27 
2:16* 


CP/M 86 interpreter 












Digital Research 
Personal BASIC 


27:28 


2:19 


3:02 


2:52 


2:49 


CP/M interpreters 












DeltaSoft DellaBASIC 


error 


12:27 


8:02 


8:43 


— 


Micro Mike's BaZic 


5;03/i 


4:23 


2:30 


8:43 


9:11 


Spectrum Logic DBASIC 


4:37/i 


3:41 


3:32 


3:56 


4:01 


APPLE MACINTOSH 












Apple MacBASIC 


5:15 


0:32 


0:46 


5:10 


5:10 


Microsoft MS-BASIC 1 .0 


24:13 


1:47 


0:67 


4:51 


4:51 


Microsoft MS-BASIC 2.0b 


21:53 


1:49 


0:70 


1:10 


1:10 


Microsoft MS-BASIC 2. Od 


22:10 


1:47 


0:73 


4:52 


4:52 


'With 8087. 11 ~ One iteration 













Manufacturer and 
Product 


Sieve test- 
Compile Exec til 
+ link size 
time (bytes] 


e Run 
time 


Mysort — 

Compile Execfi 
+ link size 
time (bytes] 


e Run 
time 




Compile 
+ link 
time 


Matrix 

Exec file Run 
size time 
(bytes) 


Compile 
+ link 
time 


-Trig test 

Exec file Runtime 
size sin( )cos( ) 
(bytes) 


MS-DOS compilers 


























Digital Research CBASIC 


0:35 


9,216 


0:16 


0:33 


9,216 


0:02 


0:45 


9,728 


0:20 


0:39 


12,800 22:10 22:12 


IBM/Microsoft 


























IBM BASIC Compiler 


0:09 


1,536 


0:15 


0:10 


1,536 


0:02 


0:11 


2,048 


0:10 


0:09 


1,664 


0:34 0:35 


Microsoft Business 


























BASIC Compiler 


0:10 


1,664 


0:16 


0:10 


1,664 


0:02 


0:13 


2,048 


0:27 


0:10 


1,792 


6:45 6:47 


Microsoft 


























BASIC Compiler 


0:09 


1,526 


0:16 


0:09 


1,536 


0:02 


0:12 


1,920 


0:11 


0:09 


1,664 


0:34 0:35 


MicroWay 87BASIC 


0:39 


17,664 


0:16 


0:39 


17,792 


0:02 


0:41 


18,176 


0:04 


0:42 


18,816 


0:11 0:11 


SoftaidMTBASIC 


0:04 


15,182 


1:24 


0:04 


15,182 


0:09 


0:07 


15,182 


0:27 


0:05 


15,182 


5:37 6:02 


Sparry BASIC B 


- 


— 


— 


— 


— 


— 


<0:01 


NA 


1:09 











CP/M compilers 


























Alcor Systems 
Multi-BASIC 


1:25 


24,704 


1:08 


1:25 


22,016 


0:08 


1:34 


25,344 


0:47 


1:27 


21,632 


12:3712:46 


System/z BASIC/Z 


0:55 


24,704 2:02/i 


0:55 


24,704 


2:12 


0:60 


25,344 


2:22 


0:66 


24,407 


2:31/i2:32/i 


i/ = One iteration. NA = Not applka 


Die. 























Table 2. 
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C Programmers: 



Consider 104 Ways — 
To Be More Productive 



If you find and choose fhe right development soft- 
ware, you can: cut development effort, make imprac- 
tical projects feasible, and eliminate unproductive, 
frustrating aspects of programming. 

Confused? We'll help you sort thru the huge number 
of alternatives. Call for comparisons or information. 



Learn C Programming 
Only $95 

"Introducing C" Interpreter 

Computer Innovations has done 
it again! This interactive implemen- 
tation is combined with a full 
screen editor and a thorough, self- 
paced manual. 

You can develop programs fas- 
ter by getting immediate feed- 
back. Programs will start instantly 
upon your command. There is no 
need to wait for "compile ond 
link." 

Introducing C includes demo 
programs, powerful C language 
interpreter, complete C function 
library, full screen editor, color 
graphics, and C language com- 
patibility PCDOS S95 



Simplify 
Screen Management 

Windows for C 

Keep your software up to date 
with the latest screen manage- 
ment features: 

• Pop up menus and help files 

■ Instant screen changes 

■ Multiple windows 

■ Complete color control 
Windows for C offers all of these 

plus much more in an integrated, 
compact, easy-to-use library of ob- 
ject code functions. Thorough, 
reference manual. Support for all 
memory models of popular C 
compilers. New version 3.1 offers 
enhanced portability ond TopView 
compatibility. Full source avail- 
able. MSDOS S180 



Which Compiler Features Do You Need? 

Optimizing C86 Compiler 

Over the years the Optimizing C86 has evolved to be the most complete 
set of C compiler tools. It includes utilities, a rich library, and thorough tech 
support In line 8087/287 routines run up to TOO times faster than the 8086 
math package. The source code to all routines is included, so you have 
complete control over how they work. Thorough ROM support, Intel UDI & 
VMS cross versions are available. 

More of the features you want include; 

• special IBM-PC library • 2 math and 2 I/O libraries 

• full memory utilization of the 8086/88/186/286 

• compatibility with most commercial libraries 

• object ond source module librarian MSDOS $339 

Fast File Access with Source 

C-lndex + 

C-lndex+ contains a high performance ISAM, balanced B + Tree index- 
ing system with source and variable length fields. The result is a com- 
plete data storoge system to eliminate tedious programming and add effi- 
cient performance to your programs 

Features include random and sequential data access, virtuai memory 
buffering, ond multiple key indexes 

With no royalties for programs you distribute, full source code, and 
variable length fields C-lndex+ fits what you are likely to need. 

Save lime and enhance your programs with C-lndex + MSDOS $375 



We carry 27 C Compilers, 4 C Intepreters, 49 Support 
Libraries, 5 C source debuggers, and 19 other C Add- 
ons for programming with MSDOS, Macintosh, or 
CP/M - more than 104 products, really. Here are 
some of the best products available: 



Why Lattice C? 

Lattice C Compiler 

Trade mags such os B^te and PC 
Tech have nearly outdone them- 
selves in praising Lattice C's 
speed and compactness. 

Lattice C is a full implementation 
of K&R. It is compatible with any 
8086 or 8088 and now has a 286 
compile option 

Seven different memory models 
enable you to select the ap- 
propriate combination of address- 
ability & efficiency to suit a par- 
ticular situation. 

Other specs include automatic 
sensing of an 8087 chip; Fork 
function; and complete I/O 
routines. 

The thorough manual even in- 
cludes subjects like interface to 
assembly language and machine 
dependencies. MESDOS Seal 



Add Communications 

Features to 

Your Programs 

Greenleat Comm Library 

Greenleaf now enables you to 
communicate with remote systems 
or dotaboses with an asynchronous 
communications library for C. 

Individual transmission and re- 
ception ring buffers combine with 
on interrupt driven system. This 
eliminates the extra function of 
separately calling up the com- 
munications program. 

Included are 3 library/object files, 
220 functions; 230 page manual, 
complete source code, library 
tailor-made to suit compiler and 
memory, Hayes-compalible 
modem commands, and a com- 
plete sample file transfer program. 
MSDOS 5169 



File Management: MultiUser/MultiLanguage 

BTRIEVE 

Billions and billions of bytes! That's what you can control with Btrieve's file 
manager. Btrieve gives you the ISAM capability you need without the 
maintenance headaches. 

Using b-trees for optimum performance, Btrieve automatically maintains 
your files in sorted order on up to 24 different fields And Btrieve offers you 
the fastest search algorithm avoilable, to give you instantaneous access to 
any individual record. You can locate any record in 4 disk reads or less 
(thanks to Btrieve's RAM cache, usually less). With Btrieve you can stop 
wasting your time beinc a file clerk and concentrate on more productive 
lasks. 

Btrieve's other features include: 

• 4 gigabyte file size 

• 4090 byte record length 

• 255 byte key length 

• duplicate, modifiable, and null keys 

• up to 24 key indexes per file 

• automatic file recovery after power failure 

Btrieve's Local Area Network version lets you migrate your software to 
multiuser environments without changing your code And offers you 
multiuser update capability beyond simple file locking schemes Available 
for all programming languages as well as C. MSDOS.Single user $245 
Multiuser S595. 

Btrieve Don't settle for less. 



Call for details, comparisons, or for our"C Extras Packet" with over 50 pages of information about C support products 



PROGRAMMER'S S 

The programmer's complete source for software, services and answers 

128- LC Rockland Street, Hanover, MA 02339 (617) 826-753 (800) 421-8006 



^■j"5"tCoHnnSuno!malsavaH companies are generally their trademarks. 
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CROSSif THOUGHTS 



Binary trees and B-trees 



By Namir Clement Shammas 



I 



n the last two col- 
umns we discussed 
I hash -based 
searching for data resident in either RAM 
or storage disks. In this issue we will 
examine alternative techniques, namely, 
those based on tree data structures. 

Efficient search methods that do not 
employ hashing must rely on having the 
data set up in some orderly fashion. For 
example, seeking specific information in 
a list of items is less time consuming if the 
list is sorted. Otherwise the entire list 
must be examined. 

A sorted list can be maintained by per- 
forming an insertion sort with each new 
element added. A secondary index list can 
be used to speed up the search. It becomes 
apparent that as the list size grows, the 
average number of shifted list members 
increases. 

Another way for maintaining data in 
sorted order, without the disadvantage of 
moving a lot of information, is to use 
binary trees. Trees are nonlinear data 
structures where each element, called a 
node, may be connected to two or more 
other nodes. A binary tree is one whose 
nodes are connected to two other nodes at 
most. Thus it is a two-way tree having a 
left and right pointer. 

The topmost node is also called the 
root. This node is the first one added to 
the tree. The nodes that point nowhere 
(have null pointers) are called terminal 
nodes or leaves. 

How is data insertion carried out in a 
binary tree? The very first inserted ele- 
ment becomes the root. Every other data 
element is inserted following a recursive 
algorithm. 

Step 1. The root is the first node used 
in the comparison step. 

Step 2. The search key of the new data 
clement is compared with the node key. If 
the search key is less than the node key. 
the node's left subtree branch is searched. 
If not, the right subtree branch is 
searched. 

Step3. Ifeitherof the subtree branches 
is empty, then it becomes the location of 



the new key. The insertion process termi- 
nates. Otherwise it continues at the next 
step. 

Step 4. The first node encountered in 
the left or right branches becomes the new 
comparison node. The process is resumed 
at step 2. 

Searching in a binary tree is conducted 
similarly. The same comparison scheme is 
used until either a match to the search key 
is found somewhere or the search fails at a 
terminal node. 

Deleting a node from a binary tree is 
not a simple operation. The type of node 
deleted (root, nonterminal or terminal) 
decides the complexity involved. Termi- 
nal nodes are the easiest to delete. Other 
nodes will leave behind gaps to be filled, 
which is done by reorganizing the portion 
of the tree that was connected to the 
deleted node. 

The worst case is when the root is 
deleted. The right subtree nodes are rear- 
ranged. The whole process looks like a 
power struggle in a dicatorship. When a 
death occurs in the government, the lower 
ranked the deceased, the less disturbance 
there is in the land. The reverse is also 
true, especially when the "head" (the 
root) of the country passes away. In that 
case there is a power struggle among the 
next-in-rank players and their clans (cor- 
responding to subtrees). 

Binary trees allow for efficient search- 
ing and maintaining sorted lists kept in 
computer memory. In languages like Pas- 
cal and Modula-2, nodes can be dynamic- 
ally allocated and/or deallocated, creating 
trees in memory whose sizes arc limited 
by hardware capacity. Pointers are used to 
access nodes. 

Dynamic trees spare the programmer 
from being locked in a predefined, fixed 
size array representing the nodes. Recur- 
sive search methods allow for easier algo- 
rithms for the traversal of the tree. Termi- 
nal nodes would cause an automatic 
backtracking to higher nodes. All these 
advantages arc lost when fixed arrays 
using nonrecursivc searches are 
employed. Now the terminal nodes must 
be supplied with special pointers to guide 
the search resumption. This kind of 
binary tree, is called threaded. 

Binary trees may be used to store keys 
in memory (when a data maintainance ses- 
sion is in progress) while the complete 



records arc stored on disk. This allows for 
a faster RAM-based search and one-disk 
access. This scheme is feasible in the case 
of sufficient memory, and the search keys 
represent a small portion of the data 
records, 

Maintaining a balanced binary tree is 
important for fast searching. The 
insertion and deletion of keys occur in an 
unpredictable order. This can very well 
lead to unevenly distributed branches. 
The worst case is to have all the nodes in 
one subtree while the other is empty. This 
creates a big linked list! It happens when a 
perfectly sorted array is inserted in a 
binary tree. 

The AVL trees (named in honor of two 
Soviet mathematicians. G.M. Adelson- 
Velskii and E.M. Landis, who described 
the balancing method) use algorithms that 
keep the binary trees in tune. This is done 
first by assigning a balance factor to each 
node, reflecting the tilt in its subtrees. 
There are three cases: tilted to the left. 
right, or balanced. 

As new nodes arc added and subtrees 
grow, there is a tendency to widen the dif- 
ference in the heights of different sub- 
trees. The insertion algorithm incorpo- 
rates code lines that deal with any 
imbalance as soon as it occurs (Listing 1). 
The action taken is to rotate subtrees 
either to the left or right to restore the bal- 
ance. As PPL code shows, there is a lot of 
node rearrangement done. Deleting nodes 
from an AVL tree requires moving nodes 
around and adjusting subtrees to maintain 
the balance. 

Since the AVL binary trees maintain 
balanced subtrees, one can use the follow- 
ing technique to increase the search speed 
in a large AVL tree. The method will actu- 
ally cause the tree structure, by academic 
definition, to cease being a true binary 
tree. 

We can attach "zoom" pointers along 
the outer node edges in both left and right 
subtrees, starting with the root. Each 
zoom pointer establishes a double-link 
between nodes and another that is n nodes 
downward. The search begins with using 
the zoom pointers, which allows for faster 
traversal along the edges. Every time a 
key comparison test fails, we use the next 
zoom pointer to locate the next node. 
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SYMBOLIC DEBUGGER 
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Examine & change variables by 

name using C expressions 
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screen 

Display C source during execution 
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DOS LINK SUPPORT 
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Uses Lattice 1 naming conventions 



Check: D Dev. Pkg (109) 
O Debugger (50) 
□ DOS Link SupL (35) 
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When the key comparison test fails or 
we reach the terminal nodes, we retreat to 
the last node searched. We resume search- 
ing by examining neighboring nodes. 

A variation of this scheme is to col- 
lect the zoom pointers in two separate lists 
or arrays, one for each primary subtree. A 
comparison with the root key decides 
which list to use. Instead of dealing with 
zoom pointers sequentially, we use the 
interval halving technique. We first com- 
pare the search key with the node key of 
the median zoom pointer. This decides 
which half of the list will be used in the 
next search. We select the median zoom 
pointer of the new half-list and so on. 



IW! 



F hat about 

searching in 
data files? How 
applicable arc binary tree techniques? The 
answer is that basically there is nothing 
wrong with applying the preceding to data 
files, except for the slowness of the hard- 
ware. Accessing data from a disk is much 
slower than accessing information from 
computer memory. 

The solution is to read as many keys at a 
time and use them in multiway decision 
making. Notice that wc said keys and not 
records, because the former are usually 
much smaller than the latter. This helps in 
having more dense information per unit 
storage. 

Immediately we realize that we have 
expanded the concept of a binary or two- 
way tree into an m-way tree. Instead of 
accessing single nodes from RAM. we 
read pages or buckets of keys or records. 
Such trees are called B-trces (Figure 1 ) 
after R. Bayer. 

Like a binary tree, a B-tree has a root 
page or node (containing multiple keys). 
The number of keys per page is also called 
the order of the B-trce. The keys are 
arranged by insertion sorting to maintain 
the advantage of searching a sorted list. 
Each key has a page pointer and a data 



B-tree of height 3 



record pointer associated with it. To 
resume searching, the page pointer is used 
to point to the next page. When a key 
matches a sought key, the data record 
pointer is used to access the entire record 
from the data file. Terminal pages or 
nodes are called leaves. Their data struc- 
ture is identical to any other nodes. 

B-trees, by definition, must follow cer- 
tain structural rules and behavior. While 
this may seem an imposed restriction, it 
actually gives the B-tree a sustained bal- 
ance and fast search capability. 

■ All leaves are on the same level 

■ All nodes and leaves are at least half 
full. 

Donald Knuth has suggested that each 
page be two-thirds full. This type of tree 
is called the B* tree. 

Listing 2 shows the PPL code for 
search routines in B-trees. The next 
CrossThoughts column, which resumes 
the modified B-tree discussion, will 
present the PPL code for insertion. It is 
very similar to that of B-trees. 

The code presented is nonrecursive. 
The search starts at the root page. Pro- 
cedure SearchNode is used to compare the 
search key with the page keys. If a match 
is found, the search in the B-tree ends, 
and the appropriate data record pointer is 
used to access the information sought 
from the data records file. 

Conversely, the comparison yields the 
pointer for the next page to be searched. 
This takes us to the next page located one 
level lower than the current one. This pro- 
cess repeats itself until the leaf pages are 
searched. 

A search to insert keys in the B-lree is 
similar. The existence of matching keys 
may flag an error if stored keys are to be 
unique. 

ow do B-trees 
grow? How arc 
keys rearranged 
in the process? The answer lies in the fact 




Root page 



Node page 
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Leaf page 
Figure 1. 
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that their growth is very much affected by 
the structural rules mentioned earlier. 

Initially there is one empty page. As 
keys are added and fill out the page, the 
following takes place when attempting to 
add a key to a full page. The page keys 
read in memory and the new key is 
inserted in the key list such that a perfect 
sorted order is maintained. Next, the 
median key is selected, dividing the list 
into two halves. The lower half is written 
back to the old page, while the upper half 
is written to a newly created page. The 
median itself is stored in another, higher 
level, new page. 

This makes the B-tree grow by one 
level. The page containing the median key 
becomes the root page. A comparison 
with the latter key will guide the search 
toward either leaf page. 

This scenario takes place at the first 
growth stages of the B-trec. As more keys 



are added, they are all inserted in the leaf 
pages. As each leaf page becomes full, it 
is split into halves and the median key 
inserted into the parent node page. If the 
latter becomes full, the same operation is 
carried out, resulting in two new, half-full 
nodes. Their median is inserted or used to 
create a new parent page node. The cas- 
cading effect is very evident when adding 
a new key to a B-trce filled at a certain 
height. This yields a new root page and an 
increase in tree height. 

Deleting keys from B-trces dictates that 
the remaining structure not violate the 
definition rules. If this leaves a page less 
than half full, one of two things may 
occur. If an adjacent page is more than 
half full, it will export a key to the key- 
deficient page. Otherwise the two pages 
are combined. This may affect the parent 
nodes and require additional adjustments. 

While B-trees are very advantageous to 
use, they certainly have their drawbacks. 
One of them is to search for a key and then 



read subsequent or previous keys, produc- 
ing an ascending/descending sorted list. 
This process involves a lot of jumping 
between pages with a relatively high num- 
ber of I/O accesses. 

Is there a solution to this problem? 
Yes— it is called the B+ tree, the subject 
of out next column. We will also discuss 
an additional modification for the B + 
tree. 

Binary trees have applications in sub- 
jects other than sorting and searching. 
They can be used as parsing trees reflect- 
ing the order and priority of code exe- 
cution, such as mathematical expressions. 
This application will be discussed in a 
future column, 

I look forward to hearing from you if 
you have any comments or thoughts to 
share about this column's subject. Q 



AVL binary tree insertion routines 

AVL tree 

EXPLICITLY RECURSIVE PROCEDURE Insert (VAR Root: Node_Pointer; 

New_Rec : Node_Rec ; 
VAR IsTaller : BOOLEAN) 



— Inserting a new node in an AVL tree and keeping balanced tree 

— HasTa Her Subtree is of type BOOLEAN 

— Balance_Factor is [-1..1] reflects the tilt of the tree 

IF Root = nil 

THEN Set Root to point to New_Rec 
BalFactor = 0; IsTaller = TRUE 
New_Rec.Left_Ptr = nil; New_Rec . Right_Ptr = nil 



ELSE 



IF New_Rec.Key <= Root". Key 
THEN 

Insert (Root A .Lef t_Ptr ,New_Rec,HasTallerSubtree) 

IF HasTa Her Subtree 

THEN 

CASE BalFactor OF 

WHEN -1 => LeftBalance 

=> BalFactor = -1; IsTaller = TRUE 

1 => BalFactor = 0; IsTaller = FALSE 



WHEN 

WHEN 

END CASE 

ELSE IsTaller 

END IF 



= FALSE 



ELSE 



Insert (Root" . Right_Ptr , New_Rec , HasTaller Subtree) 
IF HasTallerSubtree 
THEN 

CASE BalFactor OF 



Listing 1 (Continued on following page), 
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WHEN -1 => BalFactor = 0; IsTaller = FALSE 
WHEN => BalFactor = 1; IsTaller = TRUE 
WHEN 1 => RightBalance 
END CASE 
ELSE IsTaller = FALSE 
END IF 
END IF 
END IF 
END Insert 



PROCEDURE RightBalance 

— PI and P2 are of type Node_Po inter 

PI = Root".Right_Ptr 
CASE PI". BalFactor OF 

WHEN 1 => Root ".BalFactor = 0; Pi". BalFactor = 0; 

RotateLeft(Root) ; IsTaller = FALSE 
WHEN -1 => P2 = Pl~.Left_Ptr 

CASE P2". BalFactor OF 

WHEN => Root". BalFactor = 0; Pi". BalFactor = 
WHEN -1 => Root". BalFactor = 0; Pi". BalFactor = 1 
WHEN 1 => Root". BalFactor = -1; PI". BalFactor = 
END CASE 

P2". BalFactor = 0; RotateRight (Pi) ; RotateLeft (Root) 
IsTaller = FALSE 
WHEN OTHERWISE => — do nothing 
END CASE 
RightBalance 



PROCEDURE RotateLeft (VAR Ptr : Node_Pointer) 

— Tempo_Ptr is a local Node_Pointer 

IF (Ptr = nil) OR (Ptr".Right_Ptr = nil) 

THEN DISPLAY "Error" 

ELSE Tempo_Ptr = Ptr".Right_Ptr ; Ptr".Right_Ptr = Tempo_Ptr".Left_Ptr 

Tempo_Ptr".Left_Ptr = Ptr; Ptr = Tempo_Ptr 
END IF 
END RotateLeft 

Listing 1 (Continued/mm preceding page}. 

B-tree searching routines 



— Data types involved are: 

— Node_Rec = RECORD 

Count_Node_Key : INTEGER 

Node Key : ARRAY [1. .MAX] OF Key_Data 

NodeJPtr, Data_Rec_Ptr : ARRAY [1. .MAX] OF INTEGER 

— END RECORD 

Li sti n g 2 (Continued on a following page). 
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Thousands ol Professional Software 
Developers with demanding 

deadlines turn to high performance 
MS-DOS/PC-DOS tools from 
POLYTRON co boost their produc- 
tivity. All the tools shown above are 
explained in detail in the 
POLYTRON Programmer's 
Catalog. 

Network & Site Licenses Available. 

PolyWindovvs Desk 
77k' Modular, Expandable Desktop Orjunrjer 
100% memory-resident desktop 
organizer lor professionals. Configurable 
so you can have one or more of the 
following functions available instantly: 
Hex/Decimal/Binary Calculator, 
Standard Calculator, ASCII Table, 
Multiple Document Text Editor, PolyKey 
fbr creating your own keyboard macros, 
Rolodex-type files, Calendar, Alarm 
Clock, Appointment Books, Autodiaier, 
Grabber for cut-and-pastc between 
applications. Copy-Protected $49,95, 
Not Copy-Protected $84.95. 

PolyWindows Debugger/ 
Performance Analyier 
A Provisional, Memory-Resident Software 
Development Tool 

instantly analyze and debug ANY 
program running on your PC anytime. 
Superior to the IBM Professional 
Debugger and easier to use. Supports 
multiple breakpoints, multiple display 



formats, memory searches, single-step 
execution, disassembly, hex arithmetic, 
and block moves. Tells you where your 
program is spending time and allows you 
to optimize performance. You can specify 
the memory ranges for analysis. Results 
are displayed graphically or in tables. 
Includes PolyWindows Desk (Not 
Copy-Protected) all for only $149. 
(Present PolyWindows users can receive 
trade-in discounts.) 

POLYTRON Version Control 
System (PVCS) 

Efficicndt maintains revision history of 
source files for software project manage- 
meni Maintains chronological, histori- 
cal records of changes as "edit scripts" 
(reverse deltas) with full text of the latest 
"checked in" revision. Reconstructs any 
prior "revision" of any module, defines a 
"version" as specified revisions of various 
modules, supports branching from prior 
revisions, optional password protection. 
Friendly, unobtrusive user interface is 
based on a unique "syntax guide" con- 
cept with context-sensitive help. Designed 
for single or multiple programmer 
projects. A powerful tool with main- 
frame power. Single-user license: $395, 

PolyXREF 

The Mulri-Lmgud Cross Reference System 
Generates Cross Reference listings across 
single or multiple source tiles of one or 
more languages. Tells you exactly where 
each variable and procedure is defined 
and everywhere it is referenced. 



POLYTRON TOOL KITS 

Package includes PolyXREF engine 
plus one source language module plus 
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bler or English]: $49 each. Complete 
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Poly Librarian 

The Object Module Library Manager 
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PolyMake 

The Intelligent Program Builder 
und Maintenance Tool 
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been modified. Remembers the exact 
sequence ot operations necessary to 
create a new revision. Completely auto- 
matic unlike competing products. Once 
you use it, you can't live without it. 
Only $99. 
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with automatic buffer-to-disk swapping. 
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allows. PVMFM is, i library of user- 
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virtual file management capability and 
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— Variables used are: 

— Leaf : Leaf_Rec 

— Node : Node_Rec 

— ROOT, HEIGHT, MAX, MIN, NUM_PAGE : INTEGER 

— We assume that the "BTREE_Key_File" key file and "Record_File" data 

— file have been opened prior to any call. 

PROCEDURE Search (Soughtkey : KeyJData 

ROOT, HEIGHT : INTEGER 

VAR Found : BOOLEAN 

VAR SoughtLeaf, Sought_Loc : INTEGER 

VAR Leaf : Leafjtec) 

— Search procedure for B-tree 

Found = FALSE 
IF HEIGHT > THEN 
INITIALIZE: None 
LOOP 

BEGIN IF (HEIGHT <= 1) OR Found THEN EXIT END IF 
READ BTREE_Key_File, ROOT, Node 
SearchNode (SoughtKey , Node , Found , Sought_Loc) 
IF NOT Found THEN HEIGHT -= 1; 

ROOT = Node.Node_Ptr[Sought_Loc] 
END IF 
END LOOP 
TERMINATE: 

IF Found AND search is in access mode THEN 

READ Record_File,Node.Data_Rec_Ptr [Sought_Loc] , Records 
END IF 
END IF 
END Search 



PROCEDURE SearchNode (SoughtKey : Key_ 


Data; 




Node : Node Rec, 






VAR Found : BOOLEAN; 




VAR Sought Loc : 


INTEGER) 




BEGIN 






IF SoughtKey < Node. Node Key[l] 






THEN 






Found = FALSE 






Sought Loc = 1 






ELSE 






INTIALIZE: Sought Loc = Node. Count Node Key 




LOOP 






BEGIN IF (SoughtKey >= Node. Node 


> Key [Sought Loc]) 


OR 


(Sought Loc <= 1) THEN 


EXIT END IF 




Sought Loc -= 1 






END LOOP 






TERMINATE: Found = (SoughtKey = 


Node . Node Key [Sought Loc ] ) 


END IF 






END SearchNode 







Listing 2 (Continued from a preceding page}. 
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Lifeboat. 



C is the language. 
Lifeboat is the source. 



TM 

Productivity Tools from the Leading Publisher of C Programs. 

The Lattice® C Compiler 



The cornerstone of a program is its compiler; it 
can make the difference between a good pro- 
gram and a great one. The Lattice C compiler 
features: 

• Full compatibility with Kernighan and 
Ritchie's standards 

• Four memory model options for control and 
versatility 

• Automatic sensing and use of the 8087 math 
chip 

• Choose from the widest selection of add-on 
options 

• Renowned for speed and code quality 

• Superior quality documentation 

"Lattice C produces remarkable code. . .the 
documentation sets such a high standard that 
others don't even come close ... in the top cat- 
egory for its quick compilation and execution 
time and consistent reliability." 

Byte Magazine 

Lattice Library source code also available. 

Language Utilities 

Pfix 86/ Pfix 86 Plus — dynamic and symbolic 
debuggers respectively, these provide multi- 
ple-window debugging with breakpointing 
capability. 

Plink 86 — a two-pass overlay linkage editur 
that helps solve memory problems. 
Text Management Utilities — includes GREP 
(searches files for patterns), DIFF (differential 
text file comparator), and more. 
LMK (UNIX "make") — automates the con- 
struction of large multi-module products. 
Curses — lets you write programs with full 
screen output transportable among all UNIX, 
XENIX and PC-DOS systems without changing 
your source code. 

BASTOC — translates MBAS1C or CBASIC 
source code directly to Lattice C source code. 
C Cross Reference Generator — examines vour 



C source modules and produces a listing of 
each symbol and where it is referenced. 



Editors 



Pmate — a customizable full screen text editor 

featuring its own powerful macro command 

language. 

E5/P for C — C program entry with automatic 

syntax checking and formatting. 

VEDIT — an easy-to-use word processor for 

use with V-PRINT. 

V-PRINT — a print formatting companion for 

VEDIT 

CVUE — a full-screen editor that offers an 

easy way to use command structure. 

EMACS — a full screen multi window text 

editor. 

Fast'C — speeds up the cycle of edit-compile- 

debug-edit-recompile. 

Graphics and Screen 
Design 

HALO — one of the industry's standard 
graphics development packages. Over 150 
graphics commands including line, arc, box, 
circle and ellipse primitives. The 10 Fontpack 
is also available. 

Panel — a screen formatter and data entry aid. 
Lattice Window — a library of subroutines al- 
lowing design of windows. 



Functions 



C-Food Smorgasbord — a tasty selection of 
utility functions for Lattice C programmers; 
includes a binary coded decimal arithmetic 
package, level I/O functions, a Terminal In- 
dependence Package, and more. 
Float-87 — supports the 8087 math chip to 
boost the speed of floating-point calculations. 
The Greenleaf Functions — a comprehensive 
library of over 200 routines. 
The Greenleaf Comm Library — an easy-to- 



use asynchronous communications library. 
C Power Packs — sets of functions useful for a 
wide variety of applications. 
BASIC C — This library is a simple bridge 
from IBM BASIC to C. 



Database Record 
Managers 



Phact — a database record manager library of C 
language functions, used in the creation and 
manipulation of large and small databases. 
Btrieve — a sophisticated file management sys- 
tem designed for developing applications under 
PC-DOS. Data can be instantly retrieved by key 
value. 

FABS — a Fast Access Btree Structure function 
library designed for rapid, keyed access to 
data files using multipath structures. 
Autosort — a fast sort/merge utility. 
Lattice dB-C ISAM — a library of C functions 
that enables you to create and access dBase 
format database files. 



Cross-Compilers 



For programmers active in both micro and mini 
environments we provide advanced cross- 
compilers which product Intel 8086 object 
modules. All were developed to be as functional 
— and reliable — as the native compilers. They 
are available for the following systems: 
VAX/ VMS, VAX/UNIX, 68K/UNIX-S, 
68K/UNIX-L 
Also, we have available: 
ZS0 Cross-Compiler for MS- and PC-DOS — 
produces Z80 object modules in the Microsoft 
relocatable format. 



New Products 



Run/C — finally, a C interpreter for all levels of 
C Programmers. 

C Sprite — a symbolic debugger with break- 
point capability. 



Call LIFEBOAT: 1-800-847-7078. In NY, 1-212-860-0300. 



n 



YES! Please rush me the latest FREE Lifeboat"' catalog of C products. 



Name^ 



I 

I Company Name_ 
I Address_ 

I 

I 



.Title 



.Business Phone _ 



Please check one of the following categories: 
O Dealer/Distributor O End User 



D Other. 



Return Coupon to: Lifeboat'" Associates 
1651 Third Avenue, Nezv York, NY 10128 
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DATESTAMPER "has the answers 



81 : TEST! 
81: TEST: 



created 



accessed 



Jh-24 Dec'S4 11:59-16 Feb 



*:34-22 Jan 
1:55-61 Feb 



16:27-36 Jan 



11:55-61! Feb 



When did we 
print that letter? 

Has the mailing 
list been updated? 

Which is the 
latest version? 



DateS tamper" keeps your CP/M computer up-to-date! 

• avoid erasing the wrong file • keep dated tax records of computer use 

• back-up files by date and time • simplify disk housekeeping chores 

OPERATION: DateStamper extends CP/M 2.2 to automatically record the date and time a file is created, read or 
modified. DateStamper reads the exact time from the real-time clock, if you have one; otherwise, it records the order in 
which you use files. Disks initialized for datestamping are fully compatible wilh standard CP/M. 
INSTALLATION: Default (relative-clock} mode is automatic. Configurable for any real-time clock, with pre- 
assembled code supplied for popular models. Loads automatically at power-on. UTILITIES: • Enhanced 
SuperDirectory • Powerful, all-function DATSWEEP file-management program with date and time tagging • Disk- 
initializer • Installation and configuration utilities PERFORMANCE: Automatic. Efficient. Invisible. Compatible. 
Requires CP/M 2.2. Uses less than IK memory. Real-time clock is optional. 



When ordering please specify format bbmh 

8" SSSD, Kaypro, Osborne Formats $49 

For other formats (sorry, no 96 TP1) add $5. 

Shipping and handling $3 

California residents add 6% sales tax 

MasterCard and Visa accepted 

Specialized versions of this and other software available for the Kaypro. 
CP/M is a registered trademark of Digital Research, Inc. 



Write or call for further information 



(PliTPGrfect 5gstEms) 

BOX 1494 • IOYLLWILD. CA 92349 • 714.659-4432 
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Csharp Realtime Toolkit 




Realtime on MSDOS? Csharp can do it! Get the tools without operating system overhead. Cut development time with C source 
code for realtime data acquisition and control. Csharp includes: graphics, event handling, procedure scheduling, state system 
control, and interrupt handling. Processor, device, and operating system independent. Csharp runs standalone or with: MSDOS, 
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DESIGNERS DEBATE 



The dilemma of copy protection 




n lilt days before 
personal comput- 
es, when 

mainframes ruled the world, software was 
not bought and sold as it is today. A com- 
pany would license its program for use by 
a client company to run on its computer. 
Naturally, with the cost of computers, a 
company typically had only one system, 
usually rented from a hardware vendor. 
Such things as software piracy, copy pro- 
tection, and shrink-wrap packaging were 
unknown. 

The computer industry of today, how- 
ever, has an entirely different appearance. 
A site may have a dozen or more comput- 
ers in one place. Software may be found 
retailing for $100 or less. And software 
piracy is a common concern. 

This month. Designers Debate presents 
an argument clinic focusing on the general 
area of copy protection, licensing, and the 
responsibilities of software producers and 
users. The list of participants includes: 
Allen Amaroof Parsec Research, a sys- 
tems and software house; Ward Chris- 
tensen, prolific writer of public domain 
software; Pete Rowe. independent consul- 
tant and former director of R&D at The 
Learning Company; John Kennedy, a 
long-time programmer from the main- 
frame days; Dennis Hamilton, software 
designer; Dave Pifcr. founder of Com- 
puter Hobbyists Against Raiders and 
Thieves (CHART), an organization 
devoted to countering computer crime by 
educating the public; Jim Kyle, system 
operator of the COMPUTER LANGUAGE 
forum on CompuServe: Ben Sevier; Jeff 
Brenton; Scott Sharkey; Gerald Edgar; 
Tony Gambacurta; Todd M. Roy; and 
Joseph P. Salemi. 

ct's start by talk- 
ing about copy 
protection— what 
it is and what it does. 

Pif er: It doesn't. And the entire idea 
is counterproductive. 

One of the more annoying aspects of 
copy protection is that it gets good, honest 
users thinking along different lines. Given 




By Ken Takara 

a protected program, a basically honest 
person's thoughts soon turn to cracking 
the code. 

Sure, they do it for legitimate purposes, 
but the dissemination of the cracking info 
leads to more and more complications. 
And. of course, the professional pirates 
just go about their merry ways. So the 
people being affected are the normal folk. 

Sevier: I deal with the business end 
user daily. I refuse to let any of my clients 
buy protected software if there is any 
other possible way to accomplish the job. 
My clients arc all very small businesses 
and can't afford to be without back-up 
protection. I am also strongly urging hard 
disk systems for all my accounting system 
clients. A system that can't be run without 
a floppy or key in place is next to useless. 

Brenton: I have decided to return a 
SI ,600 package of programs today that, 
while not copy protected, has a license 
agreement that says I can only make three 
copies. I normally keep two copies on 
hard disk, three or four tapes in the 
archive, plus one set of floppy backups, 
for a total of 10 to 14 backups. And if I 
don't send in the signed shrink-wrap 
license agreement (the terms of which 
were hidden by the substantial box) saying 
that I agree with everything they say, they 
will provide no support! 

This is just before a page of the usual 
"We don't even guarantee that it will 
work!" To read the license terms. I had to 
break the only seal on the package, which 
means, in their opinion, that I already 
agree to their terms. And this company 
expects me to trust my business 's account- 
ing future to them. Fat chance! 

Christensen: Not only do I not buy 
copy protected software, I don't buy other 
products from companies that protect 
their software. L am a happy owner of 
SupcrCalc III . Lotus can keep their copy 
protection. I never bought DBase-xxx 
even though I had a S200 chance to 
upgrade from my CP/M version— it's 
copy protected. 

I am an honest person. I know there are 
dishonest people in the world, but I don't 
think software should be protected. 

Sharkey: Now you really asked for 
it! Software companies are treating illegal 
copying as if it were the disease itself 
rather than a symptom of the disease. 



What disease? The software companies' 
disease. 

There is still a lot of trash software 
being sold— often with significant bugs— 
which is useless yet still expensive. There 
is no legal recourse for a buyer who gets 
stuck with one of these lemons as most 
software warranties aren't worth the 
paper they're printed on. 

Software is overpriced, regardless of 
what the manufacturers say. Look at the 
typical explanations most companies give 
for high prices. First, there is "perceived 
value." What a crock! 

If the perceived value of Lotus 1-2-3 is 
$495 because of all the time it saves you, 
then why do people copy it? The fact is 
that the great majority of buyers do not 
perceive the value to be S495. Only Lotus 
does. 

Next, there is the "high cost of sup- 
port." Another crock! Have you ever tried 
to get support from one of these compa- 
nies? If you goto the dealer you are just 
wasting your time, as he either doesn't 
know anything or will just try to sell you 
another package. If you call the company, 
you are put on instant half-hour hold at 
your own expense because "all our lines 
are busy." And then, this support is usu- 
ally useless anyway. 

Kyle: Great response! Not all soft- 
ware publishers fail to back their prod- 
ucts, though. I can name three (all small 
time) that provide total support, and one 
of these gives a written guarantee that the 
product will do exactly what the manual 
says it will do or be repaired or replaced 
at the publisher's expense. If only the Big 
Guys would do the same, most of the 
problems would begin to fade away. 

Most folk arc willing to pay for good 
support if they get it. By restricting that 
support to registered owners, piracy 
becomes unattractive. 

Kennedy: The practical problem for 
large vendors is consequential damages. 
Little firms don't have to be afraid, real- 
istically, of being sued for millions of dol- 
lars because of a failure in somebody's 
payroll. Big firms do. and their lawyers 
would be insane to let them give a 
guarantee. 

Did you ever write a totally bug-free 
program longer than 25 lines or so? 
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a C Interpreter 
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Finally, a painless introduction to 
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Kyle: I only guarantee that the pro- 
gram will do what I say it will in the man- 
ual. There is an explicit exclusion of con- 
sequential damages! Despite extensive 
tests by people who usually find most 
bugs, I still have to make good on it from 
time to time. 

All I ask is that the Biggies do exactly 
the same thing: guarantee that it does what 
they say when installed per directions and 
exclude all claims of consequential dam- 
ages, or for that matter, fitness for pur- 
pose. There's no way to tell what a buyer 
expects, but it's easy to control your own 
performance claims. 

Kennedy: Another problem is that 
large programs such as compilers or word 
processors of the sophistication of Micro- 
soft Word are difficult to define. Just 
when is something a bug? For example, 
Microsoft is getting a lot of Static just now 
because the Macintosh version of Word 
docs weird things with very long 
footnotes. 

But what, precisely, should a general 
purpose word processor do with a foot- 
note that is several pages long? The situ- 
ation gets even nastier with AI. How do 
you know for sure when you have a bug in 
a game from Infoeom? One of their recent 
games, in fact, has something that looks 
just like a bug. Early on in the game, the 
display of the "lime" in the story, shown 
at the top of the screen, stops changing. 

People think they've found a bug until 
they discover that they can prevent it from 
happening by saying "WIND THE 
WATCH." I take Infoeom as an example 
because it's a clear example of software 
that does more than the author himself 
originally imagined. 

In the case of a square root routine, for 
example, you can say that the routine 
works if, for any number: 1 ) it extracts 
the square root to the maximum precision 
possible given the word length of the 
result and the original imprecision due to 
the word length of the argument, or else 
2) it correctly says that the square root 
cannot be taken because the argument has 
none. 

So that's easy. But in a natural language 
input situation with only partially quan- 
tifiable data, many of the possible input 
interactions may never have been actually 
defined in any strict sense. How can you 
be sure that a bug is there? 

Arnaro: We've just announced an 
upgrade to our product for owners of the 
previous package. I've been getting calls 
at the rate of about 10 per day. And more 
than half of them can't give me the serial 
number. I got a call from one person for a 
replacement manual because he "spilled 
coffee on it." 1 even got a request for a 
refund. And none of these people could 
give any proof they had purchased it. 



Pif er: The best protection you have is 
to keep diligent records of those people 
who have bought authorized copies . Then 
the coffee spills, lost serial numbers, and 
so on aren't such a problem. You know 
who owns your product and the threat of 
rip-off is not so serious. 

Kennedy: Just take a look over on 
GamcSig on CompuServe. Fairly often 
someone will come up with how his 
mother threw away the Infotator from 
Sorccror or the chart from Starcross, both 
of which are necessary to get past ran- 
domly varying puzzles in the games. Stan- 
dard operating procedure is to tell them, 
"Gee, I hope you sent in your regis- 
tration. I'm sure Infoeom will be willing 
to send you a new package." 

Roy: I like the idea of one software 
developer. He encodes the serial number 
and the name of the purchaser in every 
program he sells. Every time the program 
is run. it comes up with the serial number 
and name. 

Any attempt to remove or change the 
number or name causes the program to 
erase itself from memory as well as 
attempt to remove itself from the disk. 
Otherwise the user can make as many 
copies as he wishes. You would be less 
prone to giving it away knowing that your 
name will be presented every time it is 
used, even by someone else. 

Amaro: Perhaps it's just the market 
we've been selling to— the mass market. 

Pifer: It's a safe bet that mass market 
software is more prone to piracy than 
packages tailored to professionals. Of 
course, the primary reason for this is that 
the mass market has not been educated to 
the fact that piracy is theft. John and Jane 
Consumer have a very limited perception 
of what is involved in creating a viable 
software product and even less of an 
understanding of the repercussions of 
their acts. 

Rowe: The probability of software 
copy protection being broken is directly 
proportional to its perceived value by the 
kids who break it. This means that some- 
thing like VisiCalc, which has little value, 
isn't vulnerable. However. SkyFox — 
most of Electronic Arts' products for that 
matter— has a very high perceived value 
and is always being worked on. 

Once a kid has broken the protection, 
he usually has a network of friends that be 
passes it to. After that, he may go to the 
Source and update the parameter list for 
one of the copiers, like LockSmith. Or he 
may start distributing it outside his own 
group. 

Kennedy: Not just consumers. My 
company is putting in quite a few PCs. 
Only this morning, someone told me, 
"Look what I have! Someone made me a 
copy of this word processor so that I won't 
have to use EDLIN." I told her that she 
could be fired for it and pointed out that 
this was theft. She just told me not to 
worry and after all, it wasn't a new prod- 



22 



CIRCLE 87 ON READER SERVICE CARD 



uct, and in short, acted like a pre-Civil 
War slaveholder faced for the first time 
with an abolitionist. 

It was as though I had somehow com- 
mitted a monstrous breach of etiquette. 
And this is a mainframe system program- 
mer in her 30s. not a particularly psycho- 
pathic personality, and certainly not igno- 
rant of the labor that goes into any 
significant piece of programming. 

Frankly. I don't think people arc basic- 
ally honest. Most people think of them- 
selves that way, but the plain fact is that 
whenever we want to indulge ourselves in 
something a bit underhanded, we always 
manage to find a good explanation why 
litis is a special case. 

Does this hold out much of a promise 
for removal of copy protection? I doubt it. 

Hamilton: Everything I've seen that 
permits arbitrary copying without allow- 
ing redistribution involves some sort of 
key-and-Iock technique that ties the soft- 
ware to a given system. If the key is on a 
special disk, there is the problem of hav- 
ing it in the machine in order to work the 
program. 

The alternative is some sort of key that 
is confirmed by inspection of the host 
computer. There are machines that have 
their serial numbers in machine-readable 
locations and that helps. Usually there 
needs to be a special technique for getting 
the first copy onto the system, but it's 
straightforward after that. 

There is also a method in which a hard- 
ware key is plugged into the computer in 
order to run a program. Often it plugs into 
a game port on the side of the computer 
and is read by the program. 

Roy: ADAPSO has been turned down, 
thank the great JuJu. Actually, hardware 
keys are nothing new. Years ago, someone 
made a graphics editor for the TRS-80 
that required a key to be plugged into the 
cassette port. It went under, 

Sa lemi: Besides, we all know how 
difficult it is to keep track of all the disks! 
Imagine trying to organize keys for all of 
them? Glad the idea went nowhere. 

Hamilton: Copy protection should 
allow all useful application of the software 
by the purchaser. The idea is to force the 
thieves to demonstrate guilty knowledge 
that their actions are unlawful, not to 
make foolproof protection or bring harm 
to anyone's use of their computer. 

This does discourage people. And those 
it doesn't hinder at least can't proclaim 
cow-eyed innocence that their actions are 
not reprehensible. Since I don't believe in 
restricting a purchaser's ability to make 
copies as part of the meaningful use of the 
software, I guess we need to distinguish 
between techniques that discourage piracy 
by preventing copying and by other 
means. 

Pifer: The software industry would be 
a far sight better off to invest the money in 
education rather than wasting it rein- 
venting the copy protection wheel. I'll 
stand by a common belief that most folks 




who know right from wrong will pick 
right. Those that would pick wrong are 
going to pick wrong no matter what. 

Edgar: One of the excuses one some- 
times hears is, "These copyright 
restrictions are not enforceable and 
probably not legal anyway, so I'm within 
my rights to copy this." 

Kyle: I just saw in the paper that 
American Brands, the tobacco company, 
is defending itself against a piracy suit 
filed by MicroPro over WordStar with the 
claim that shrink-wrap licenses are simply 
not valid since there is no chance of nego- 
tiating an agreement. 

A number of the attorneys in the soft- 
ware field have told me that they share 
this belief and would happily defend on 
such grounds. 

'he 1980 revision 
to section 1 17 of 
the 1976 federal 
copyright act reads, in part, "it is not an 
infringement for the owner of a copy of a 
computer program to make, or authorize 
the making of, another copy or adaptation 
of that computer program provided ( 1 ) 
that the new copy or adaptation is created 
as an essential step in the utilization of the 
computer program in conjunction with a 
machine and that it is used in no other 
manner, or (2) that the new copy or adap- 
tation is for archival purposes only ..." 

Rowe: One thing you have to think 
about also is what do you do about pros- 
ecution? Can these small publishers get 
involved in prosecution? Without it, 
there's no bite to the protection or 
copyright. 

Amaro: One of the things you have to 
do is aggressively go after pirates in order 
to maintain your copyright. Otherwise 
you can easily lose your rights to the 
software. 

Kennedy: Someone in PC Week's let- 
ters column just said that he wouldn't con- 
sider any software to be fairly priced until 
it reached the price of a hardcover book. 
So until it gets there, he'll just go on steal- 
ing it. 

I'm really beginning to think that noth- 
ing but a few well-publicized jail terms 
will do any good. Don't these people have 
any idea how much labor goes into a 
100,000-line program? Or of the differ- 
ence in degree of detail work between 
something you hack together for your own 
use vs. a crash-proof, idiot-proof, all- 
possible-input-proof commercial 
product? 

Salemi: Dave Pifer has the right 
idea. Education is the answer. It's nice to 
see that many corporations are making the 
effort to inform their employees of copy- 
right laws and are setting company poli- 
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cies against copying for personal use. As 
long as they enforce the policy, they have 
done a major first step in the education 
process. 

Software companies can do a great deal 
to help this along by providing more liber- 
al site licenses. If a company can make the 
copies it needs under a license, then it sets 
the example for employees by obeying the 
law. And the software company makes 
money in the process. This route seems to 
have much greater potential for helping 
both the end users and the software com- 
pany. 

Rowe: 1 have experience working 



with schools. Face it, kids in the class- 
room are rough on diskettes. They need a 
way to make backups. In many cases, 
school districts have adopted the pur- 
chasing policy that if it doesn't have pro- 
vision for backups, they will not purchase 
it. 

There are several ways we can handle 
the case of schools. One is noncopy pro- 
tection. Another is to permit multiple 
loads in the classroom without a local area 
network. Then there's the issue of licens- 
ing that the Minnesota Educational Com- 
puting Consortium is pushing. 

The school market is a very large mar- 
ket. But they are typically on a very tight 
budget. They can't afford to buy much 
software at the current price. It's always 
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been that a school would buy a computer, 
plug it in, turn it on, and say, "Hey! Well, 
now what?" 

"Well, now you cither have to create or 
buy some software! " 

"Oh no! We ran out of money buying 
the computer!" 

Surprise, surprise. They really don't 
have a lot of funds. If they have multiple 
machines in the classroom, these $40 or 
$50 computer products have got to be able 
to serve on all those machines. 

Pif er: The little guys in this business 
have it tough enough without the added 
problems and expense of going the copy 
protected route. While I won't buy protec- 
ted software from even the biggies, I most 
certainly would not buy a protected disk 
from some small guy who may not be in 
business six months from now when I 
need to buy a replacement disk. 

Roy: I really think that pirates simply 
like the challenge of breaking protected 
software and then thumbing their noses at 
the producers. While we're on the subject. 
how many copy programs are themselves 
copy protected? (Answer: Most.) Isn't 
there a contradiction somewhere? 

Rowe: It's like a phase of maturation 
for the hacker. Many of them go through 
it. Generally, I think, they are the high 
school kids who are bright enough not to 
have to spend all their time on their home- 
work. I think the worst fear of a publisher 
is the boot trace, where you actually trace 
through the code, separating out the pro- 
tection code. You can do it if you've got 
the time. It's all a matter of time. No sane 
publisher would consider himself per- 
manently protected. 

Gambacurta: There is an argu- 
ment that suggests that software piracy 
helps the publishers to some degree. The 
idea is that the proliferation of a package 
gives it exposure. Giving a product 
exposure is important for market develop- 
ment. I don't personally buy this argu- 
ment, but I think it is interesting. 

Kennedy: There is also the 
approach of demo or sampler copies of 
software. This is a version of the program 
with some critical part^such as SAVE or 
PRINT— left out. For example, there was 
the free copy of Microsoft Word in the 
subscriber copy of PC World. 1 have also 
seen cheap, $9 versions for sale with a 
rebate coupon toward the real thing. 

Pif er: As you know, I am the founder 
of CHART, located here in the Writers 
and Editors SIG of CompuServe, trying to 
bring matters of ethics, morals, and com- 
mon sense into play in the computer field. 
If and only if education is given a fair shot 
and has proven ineffective will I buy the 
"bigger and better protection is our only 
hope" premise of most software 
companies. H 
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Give your Forth the 
recursive powers of 
LISP and C 



Forth: 

Twithe Curthed, 

too! 




ISP and C pro- 
grammers lake 
special pride in 
I their languages' 
compact code and often argue over which 
language's brcvity-to-power ratio is more 
favorable. The method offered here for 
adding recursion to Forth imple- 
mentations may give Forth the prize, con- 
sidering the power recursion adds and that 
the code consists of one short line. Of 
course, LISP and C already support 
recursion; the point is that in Forth a very 
powerful programming strategy can be 
added by means of very terse code. 

Forth is clearly extensible in the sense 
that new programs (or words, as they are 
called in Forth) can be added in compiled 
form to the interpreter. But the really dra- 
matic extensibility of the language is not 
seen until one understands that it is actu- 
ally possible to add completely new con- 
trol structures as well. 

Most implementations of Forth come 
with a fairly rich selection of standard 
control structures, and so unless an appli- 
cation cries out for a very specialized one. 
this feature can easily be overlooked. As 
it happens, recursion is neither highly 
dedicated nor usually supplied and thus 
makes a very attractive illustration of 
Forth's extensibility. 

Recursion 

Recursion is an alternative to iteration that 
is particularly attractive in cases where 
the original task can be broken down into 
a finite set of smaller, similar tasks. In 
effect, recursion allows a word to call 
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itself on parameters that redefine the 
scope of the call. This kind of re-call is 
most interesting for words that are 
functions— words that return a result- 
since each function call can be made to 
depend on and wait for the succeeding 
call's return before completing its 
calculation. 

In such a scries of calls, one can dis- 
tinguish a wind and an unwind phase, 
the former consisting of the series of 
calls, the latter of the sequential com- 
pletions of the calls. Where the recursive 
word is a function, typically only parame- 
ters are passed to the next call during the 
wind and only returns from completed 
calculations during the unwind. 

In Forth, however, a variation on this is 
possible in which values (not returns, 
though) are pushed onto the stack during 
the wind for popping off during the 
unwind. Since each call in the unwind 
phase must know where to find the value 
being passed to it, recursion is most at 
home in an environment that includes a 
stack. In the best of cases, variables need 
not be used at all. 

To ensure an end to recursions, the 
code must include a terminating condi- 
tion. Where the word is a function, a pre- 
defined value should be returned on 
reaching the terminating condition for use 
by the next waiting, incomplete 
invocation. It is not necessary, however, 
that a word be a function in order for it to 
benefit from recursion. 

A word may be a procedure rather than 
a function, and as such, have as its objec- 
tive certain side effects— for example, 
changes in the values of variables, system 
calls, screen displays, etc.— rather than 
the returning of a value. Even if a value is 



returned, the value may be of no interest 
to the waiting, incomplete calls. This use 
of recursion is called tail recursion by 
LISP programmers. 

Of the examples supplied later, the 
Fibonacci calculation (Fib) uses recursion 
in the first way mentioned, passing each 
call's return as a parameter to the waiting 
call during the unwind; the factorial cal- 
culation (FAC) is like the special Forth 
case, pushing values onto the stack during 
wind for use during unwind; and Quick- 
son is like the third case, a procedure that 
shifts stored values in an array during 
each call. 

Using SMUDGE 

Since Forth provides such exceptional 
control of its stacks, it is a natural for the 
use of recursive algorithms— those that 
generate values during wind and those 
that produce returns during unwind — 
since both need a place to rest their output 
for pickup. 

Fortunately, it is possible to add recur- 
sion very easily to implementations based 
on the Forth Interest Group (FIG) stan- 
dard, since FIG vocabulary includes the 
little used word SMUDGE. Despite its 
modest associations. SMUDGEis virtu- 
ally all of the recursion to be added. To 
understand this, we have to take a look at 
Forth's dictionary and the way in which it 
is used at compile time. 

Forth words are used exactly the same 
way commands are used in an interpreted 
and interactive language such as BASIC. 
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Creating a new ward amounts to adding a 
command to the interpreter, a process that 
involves compiling the source code for the 
command and having it added to the inter- 
preter's dictionary of available routines. 

The problem for recursion occurs dur- 
ing the compiling process since the Forth 
compiler checks each command used in 
the new source code to see if it is already 
known (present in the dictionary). Nor- 
mally, the word that is in the process of 
being compiled is not yet officially in the 
dictionary. It isn't officially in until com- 
pilation has been completed successfully. 
This means that using the same command 
as the one being compiled in the latter's 
source code will generate an error-based 
break. 

This problem can be resolved once we 
understand why the word being defined is 
not found . It is not found because a stop 



flag is set at the head of the new word's 
name field in the dictionary— a stop flag 
that is not reset until the new word is suc- 
cessfully compiled. 

This flag, however, can be toggled by 
the SMUDGE command so that the word 
in the process of compilation can actually 
be discovered in the dictionary search. In 
order to facilitate this process, we can 
define a new operator using any unused 
character, in my case the BAR ( | ), for 
inclusion in recursive source code. The 
definition is: 

: | SMUDGE ; immediate 

The immediate is important since it will 
make the BAR operate during compile 
time when it is needed. With this operator 
available, let us see the BAR in operation 
in the recursive calculation of n ! (Listing 
1). 

FAC takes one parameter off the stack. 



: TORIAL dup 1 = if dup * else dup 1 - | TORIAL | * then ; 
: FAC TORIAL . ; 

Listing 1. 



( FIBONACCI number calc using BAR-RECURSE ) 


: ONACCI dup 1 = if drop 




else 




dup 2 = 




if drop 1 




else 




dup 1 - j ONACCI 




swap 2 - | ONACCI j 




+ 




then 




then ; 


: FIB 


ONACCI U. ; 


Listing 2. 





If the parameter equals 1 , then it dupli- 
cates it and multiplies the two together, 
yielding I on the stack for print out. If the 
parameter is greater than 1 , then it places 
it on the stack, duplicates it, places a num- 
ber 1 less on the stack, and calls itself. 
The effect is to push a parameter onto the 
stack during each call of the wind. For 
example, 5 FAC will place 5 4 3 2 1 on the 
stack. When 1, the terminating condition, 
is reached, the appropriate number of 
multiplications that have been waiting in 
the wings unfold as follows: 5 4 3 2,546, 
5 24, 120 leaving the final product either 
on the stack or put to the screen. 

The operation can best be understood 
by noting that no call to TORIAL is 
complete— that is, reaches "*"— until the 
terminating condition, parameter = 1, 
has been satisfied. Once the terminating 
condition has been satisfied, the remain- 
der of each unfinished call to TORIAL 
unfolds, in this case "*". 

One might also wish to test the BAR in 
terms of its speed. For this purpose, we 
have a very convenient comparison base 
in the times recently listed in COMPUTER 
LANGUAGE (Feb. 1985, p. 79) for 21 C 
compilers. 

Fib (Listing 2) clocked in at 1 14 sec (on 
my Osborne lb with Software Toolworks' 
implementation of a FIG version of Forth) 
for 25 Fib (46,368). a very good time 
although it is last of the five CP/M com- 
pilers for which values were given. How- 
ever, it is last only by 1 sec against BD 
Software's compiler and 1 sec for The 
Code Works' 

In addition, two of the seven CP/M 
compilers had no times, one because it 
was still working after 5 min, the other 
because it would not compile. This makes 
1 14 sec a good time, given the exception- 
ally friendly development and debugging 
environment available in Forth and gener- 
ally absent in traditional compilers. Fib 
also demonstrates that the BAR works 
even when multiple recursions are used in 
the word. 

Indirect recursion 

The cases of recursion discussed so far 
were all cases of what is usually called 
direct recursion, in which a particular 
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( INDIRECT RECURSION with BAR ) 

variable RCSAD 

: TEST1 ." OK! " cr RCSAD @ execute 

: TEST2 | [ ' TEST2 CFA RCSAD ! ] | 
TESTI ; 



RCSAD holds TEST2's 
( CFA address 

( from | to | sets the } 
( TEST2 CFA address ) 



Listing 3. 




( QUICKSORT using BAR-RECURSE ) 
( set up for 20 integers ) 

variable XX 40 allot variable MIDDLE 

: | smudge ; immediate ( ' | ' allows recursive calls ) 

: ENT .clear 40 do I 2 / 1 + . ." Int ? : " 

query 1 word number drop XX I + i cr 2 +loop ; 
{ entry word ) 

: PUT 40 do cr I 2 / 1 + . ." : " XX I + @ . 2 +loop ; 

( prints array of ints to screen ) 

10 load 

( QUICKSORT scr #2 ) 

K@ 2 * XX + @ ; 






( the QUICKSORT ) 
( implementation is due ) 
( to Gary Nemeth of ) 
( Cleveland, Ohio ) 



: K! 2 * XX + ! 
MIDDLE§ over - 2 / + K@ MIDDLE ! 
COMPARE K§ MIDDLE @ - ; 
EXCHANGE 2dup K@ swap K@ rot K! swap K! ; 
20VER 6 pick 6 pick ; ; 2SWAP 4 roll 4 roll ; 
SORT 2dup > if drop drop else ( lo hi } 
2dup 2dup MIDDLEg 

begin swap begin dup compare 0< while 1+ repeat 
swap begin dup compare 0> while 1- repeat 
2dup > not if 2dup exchange 1 -1 D+ then 
2dup > until swap rot 
20VER 20VER - rot rot - < if 2SWAP then 
I SORT I I SORT I then; 






Listing 4. 



FOR TRS-80 MODELS 1 , 3 & 4 
IBM PC, XT, AND COMPAQ 

COMMERCIAL 

SOFTWARE 
DEVELOPERS 

and 

INDIVIDUAL 

PROGRAMMERS 

appreciate MMSFORTH for its: 

• Power 

• Flexibility 

• Compactness 

• Development speed 

• Execution speed 

• Maintainability. 

When you want to create the 
ultimate: 

• Computer Language 

• Application 

• Operating System 

• Utility, 

BUILD IT In 

INFORM 



(Unless we have it ready for you now!) 

Bulk Distribution Licensing @ $500 
for 50 units, or as little as pennies 
each in large quantities. 
(Corporate Site License required.) 

The total software environment for 
IBM PC, TRS-80 Model 1, 3, 4 and 
close friends. 

• Personal License (required): 

MMSFORTH Syatem Diak (IBM PC) .... $249.95 
MMSFORTH Sy*1»m Disk (TRS-80 1, 3 or 4] 129.95 

• Personal License (optional modules): 

FORTHCOM communications module . . . . t 39.95 

UTILITIES 39.95 

GAMES 39,95 

EXPERT-2 expert syslem 69.95 

DATAHANDLER 59.95 

DATAHANDLER-PLUS (PC Only, 128K req.) 99.95 

FORTHWRITE word processor 175.00 

• Corporate Site License 
Extensions fromst.aoo 

• Some recommended Forth books: 

UNDERSTANDING FORTH (overview) ... $ 2.95 

STARTING FORTH (programming] 16.95 

THINKING FORTH (technique) 15.95 

BEGINNING FORTH (re MMSFORTH) . . . 16.95 
Shipping/handling & tax extra. No returns on software. 

Ask your dealer to show you the world of 
MMSFORTH, or request our free brochure. 

MILLER MICROCOMPUTER SERVICES 
61 Lake Shore Road, Natick, MA 01760 

(617)653-6136 
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NGS FORTH 



A FAST FORTH, 
OPTIMIZED FOR THE IBM 
PERSONAL COMPUTER AND 
MS-DOS COMPATIBLES. 

STANDARD FEATURES 
INCLUDE: 

•79 STANDARD 

•DIRECT I/O ACCESS 

•FULL ACCESS TO MS-DOS 
FILES AND FUNCTIONS 

•ENVIRONMENT SAVE 
& LOAD 

•MULTI -SEGMENTED FOR 
LARGE APPLICATIONS 

•EXTENDED ADDRESSING 

•MEMORY ALLOCATION 
CONFIGURABLE ON-LINE 

•AUTO LOAD SCREEN BOOT 

•LINE & SCREEN EDITORS 

•DECOMPILER AND 
DEBUGGING AIDS 

•8088 ASSEMBLER 

•GRAPHICS & SOUND 

•NGS ENHANCEMENTS 

•DETAILED MANUAL 

•INEXPENSIVE UPGRADES 

•NGS USER NEWSLETTER 

A COMPLETE FORTH 
DEVELOPMENT SYSTEM. 

PRICES START AT $70 

NEW^HP-150 & HP-110 
VERSIONS AVAILABLE 



m 



NEXT GENERATION SYSTEMS 
P.O.BOX 2987 
SANTA CLARA, CA. 95055 
(408) 241-5909 




word calls itself from within its own com- 
piled definition. It is also possible to set 
up indirect recursive control structures in 
which a word"s definition includes a call 
to a later word which, in turn, calls the 
calling word. The BAR will also allow 
this structure but with some additional 
complications. 

The BAR was able to operate relatively 
simply for direct recursions because the 
address needed already existed— it was 
just a question of allowing the compiler to 
find it. In the case of indirect recursion, 
the address needed is unknown during the 
compiling process and consequently can- 
not be found. The solution is to supply the 
address when it becomes available during 
the compilation of the called word. In 
order to do this, one of the two (or more) 
words must do its calling by means of a 
pointer, an address contained in a vari- 
able. The code in Listing 3 provides a 
model for the relationship. 

To simplify the code and make its strat- 
egy clearer, no terminating condition has 
been included and the word will crash 
after a time. TEST1 simply prints out 
"OK!" and a carriage return and executes 
the code at the address stored in RCSAD. 
TEST2 begins by invoking the BAR in 
order to toggle the SMUDGE bit and allow 
itself to be discovered. It then uses the left 
bracket to switch into run time and the 
tick to get TEST2's PFA (parameter field 
address) onto the stack. 

It seems fairly standard in both Forth- 
79 and FIG to have the tick return the PFA 
and EXECUTE take it as its parameter. 
My own Forth seems to want the CFA 
(code field address), hence the next 
invocation in TEST2 is CFA, whose 
return is then stored in RCSAD. We next 
return to compile time by means of the 
right bracket and once again toggle the 
SMUDGEbil, finally calling TEST1. In 
effect, the code between the BARs in 
TEST2 finds the CFA of TEST2 and 
stores it in RCSAD during the compiling 
ofTEST2sothatTESTI will know where 
to call TEST2 when it is run . 

The next word is based on a version of 



Quicksort written by Gary Nemeth of 
Cleveland. Ohio (COMPUTER 
LANGUAGE, Dec. 1984. p. 9). His ver- 
sion was set up for IBM PC display man- 
agement and presupposed the availability 
of20VER, 2SWAP, aMRECURSE. Fvc 
replaced the display management setup 
with a straightforward array, defined 
20VER and 2SWAP , and replaced 
RECURSE with the defined BAR. The 
sort requires that the low number of the 
list to be sorted be entered first on the 
stack, then the hii>h, followed by the call 
to SORT. 

The code in Listing 4 includes an 
integer entry word called ENTand an out- 
put word called PUT; it is set up to sort 20 
integers. A typical run would have you 
command ENT. enter 20 integers into the 
array, then 1 and 20, followed by SORT, 
and finally PUT, which prints the sorted 
list on your screen. This Quicksort has 
two benefits: it demonstrates a recursive 
word that is more procedural than func- 
tional and. in addition, is a useful kind of 
sort in general. 

Thus ends our short excursion into the 
land of self-reference, the strange 
enchanted land of snakes that devour 
themselves and liars who proclaim that all 
of their kind are liars. What you have 
learned here will enable you to turn to all 
of your LISPing friends and tell them that 
your Forth ith twithe curthed. tool W 



Dr. Jean-Pierre Schachter is associate pro- 
fessor of philosophy and dean of arts and 
social science at Huron College, London, 
Out. , which is affiliated with the Univ. of 
Western Ontario. 
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Microprocessor programming made simple. 



"Keep it simple" was the principle 
of the 14th Century English philos- 
opher William of Occam and it has 
even more validity today. Faced with 
the problems of sophisticated 
computer systems, designers have 
found that ever more complex pro- 
gramming languages are further 
complicating their tasks. Until now. 

Occam. Created for system 
design and implementation. 

When we started designing our 
new VLSI family of 10-M1P trans- 
puters, we built on William's simple 
philosophy. To take advantage of 
the possibilities opened up by the 
transputer, we needed to create a 
language capable of properly ad- 
dressing parallelism and multi- 
processor systems. 

With the ability to describe con- 
currency (whether timeshared or 
real) and to handle message- 
passing at the lowest level of the 
language, all aspects of a system 
can be described, designed and 
implemented in occam. From in- 
terrupt handling through signal 
processing to screen editors to 
artificial intelligence. And on. 

But occam is not limited to our 



transputer family. It provides an 
efficient, responsive implementa- 
tion language for systems built 
on today's microprocessors. It also 
opens up future possibilities with 
its performance -enhancing 
multiprocessor capabilities. And 
INMQS now offers a product to let 
you exploit Occam's total capability 
in your system. 

Simplify your job with the 
Occam Programming System. 

The Occam Programming System 
(OPS) gives you the tools for com- 
plete VAX /VMS software develop- 
ment. This package includes an 
integrated editor /checker, an 
optimizing VAX compiler and full 
documentation. This gives you a 
supportive environment for the 
development of occam programs 
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for execution on the VAX. Cross- 
compilers for 68000 and 8086-based 
systems will also be available. 

What's more, the occam programs 
developed and proven on the OPS 
will give you a head start for work 
with the INMOS transputer. Exten- 
sions to the OPS will be available 
which will allow occam programs 
to run on the transputer. 

And if you have a requirement 
to program the transputer in other 
popular high-level languages, other 
extensions will include compilers 
for C, Fortran, and Pascal. 

Get started today. 

Contact us for our information 
pack on occam. the Occam Program- 
ming System and the transputer. 
You'll be surprised how simple 
your life can be. 
For quick response, call us at 
* (303) 630-4000 or write: 
| Occam. P.O. Box 16000, 
£ Colorado Springs, CO 80935. 

#inimos 

and occam are trademarks of the 
Inmos Group of Companies 




CIRCLE 99 ON READER SERVICE CARD 



HCR/PASCAL, WIRTH ITS WEIGHT IN C 



PASCAL 



Originally designed by Niklaus Wirth, is now 
available for a wide range of UNIX 1 " 
processors. HCR/PASCAL conforms closely 
to industry standards, passes all conformance tests in the PASCAL 
Validation Suite. Supports multiple module programs, a dynamic 
string package, and direct random file access. 



Cis the standard language of UNIX, HCR/PASCAL is written in C 
and translates PASCAL into C producing efficient optimized 
code. This approach allows direct interaction with the UNIX 
environment and offers a high degree of portability. 



UNIX 



is a powerful yet flexible operating system environ- 
ment. HCR/PASCAL is available today on a diverse 
range of UNIX hardware: AT&T 3B™ series, the NCR 
Tower,™ DEC PDP-11 /VAX,™ and others. HCR has a growing line of 
UNIX software including business applications. We back up all our 
software with full support. To find out how we can put HCR/PASCAL, 
C, and UNIX together for you, call or write: 



Human 
Computing 
Resources 
Corporation 



»UR 



10 St. Mary Street, Toronto, Ontario, Canada M4Y1P9 (416)922-1937 



See us at UniForum Booth #1441 

UNiXisalraaa-rurtOtMIlawalc™. POP-u UX*Ha&wir***~to#O#aZ<»v»**-ax0«»<* Am»«i™»n«dA™wT.tog-iph*W«iiiM NOT *■«'■=. ^^-tfieRCowBion 
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Porting 

the UNIX 

Utilities 




is widely 
acknowledged 
to be one of the 
most portable of 
the ALGOL-like, block-structured pro- 
gramming languages. One of the reasons 
for its portability, paradoxically, is the rel- 
atively low system-level abilities of C. 
Almost any low-level manipulation can be 
implemented efficiently as a C function, 
so there is not a strong tendency to extend 
the language. 

Another reason for the de facto stan- 
dardization of C is that for a long time 
there was essentially one textbook on C 
and one large company promoting C. This 
is obviously changing, and we can only 
hope that the newly formed ANSI/IEEE 
efforts toward the standardization of C 
will be as successful . 

UNIX system utilities are commonly 
dismissed as being source-code portable 
since they are written in C. As a general 
statement, this is true, but there are 
several small exceptions. 

This article gives a brief discussion and 
categorization of the C language por- 
tability problems that I and a team of co- 
workers at Motorola Microsystems 
encountered when converting UNIX Sys- 
tem V utilities from a VAX to a 
M6800O-based computer. The hurdles we 
overcame may help the reader understand 
some of the fundamental technical issues 
regarding the C language and its por- 
tability between different machines. 

Many of the problems in our project 
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were actually caused by latent bugs that 
were invisible on the original host. A few 
were caused by bad coding practices. All 
could have been avoided. 

The System V/68 port 

Several of our team members had been 
involved with a port before, and the port 
leader was an experienced UNIX system 
guru, but for most of us (the author 
included), it was a new experience. What 
we lacked in experience, we made up for 
in commitment and enthusiasm and 
learned a great deal along the way during 
this project. 

A UNIX system port project naturally 
divides into three major subtasks: kernel, 
utilities, and compilers (including 
libraries). 

The kernel of the UNIX system com- 
prises the initialization, swapping and 
scheduling, process management, input/ 
output, and device driver functionalities 
of the system. This is about 20.000 lines 
of code and contains a number of hard- 
ware dependencies. About !0% of the 
kernel code is written in assembly lan- 
guage. The kernel excludes some func- 
tionality commonly considered to be part 
of an operating system. The command 
interpreter sh( I), for example, is not part 
of the kernel, but is counted as a utility. 

The compiler task includes the porting 
of compilers, assembler, linker, language 
preprocessor, etc. The development of the 
assembler and C compiler and the cre- 
ation of the libraries are the main issues 
here. The system call interface and a 
small amount of library code are in 
assembly language and need to be 
rewritten, although most of the library 
code is in C. In our case, we chose to port 



the Bell Labs SGS II compiler. This was a 
cross compiler that ran on the VAX and 
produced M68000 code. To port it, there- 
fore, we did not have to change the code 
generation functionality, but we only had 
to get the compiler to run on the EXOR- 
macs computer. 

Most of the code of the UNIX system, 
however, is for utilities, such as awk(l), 
grep(l), lint(l). and many others, includ- 
ing the shell (sh(l)) itself. These are writ- 
ten entirely in C. The parenthesized num- 
ber refers to the UNIX manual section in 
which the utility appears. The utilities 
with which we arc concerned are either in 
sections 1, 1M, 1C, or IG. These desig- 
nations refer to ordinary, system adminis- 
tration, communications, and graphics 
utilities, respectively. 

Although the utilities arc sometimes 
dismissed as being completely portable, 
wc found that there were several man- 
years of work to be done in porting them 
from a VAX to a M68000. By far most of 
this work was involved with rewriting 
makefiles, packaging, testing, and 
reworking utilities— such as sdb(I), 
which has substantial amounts of func- 
tional machine dependency. 

System V/68 utilities 

The VAX version of System V has 303 
utilities supplied by Bell. Any enumer- 
ation is necessarily ambiguous. For exam- 
ple, are cpfl)'andln(l) separate utilities? 
They both represent the same entry point 
in the same executable file. (I say they are 
two different utilities.) Is the entire 
graphics subsystem one utility or 57? 
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(One.) Is each game (Mastermind, Hang- 
man, etc.) a separate utility? (Yes.) Is the 
SCCS system one utility or 13? (13.) 

I counted only those utilities repre- 
sented by executable files in the direc- 
tories /bin, /usr/bin. /etc. or /usr/games. 
The exact number is neither well-defined 
nor important, but it appears that System 
V contains about twice as many utilities as 
the UNIX Version 7 operating system. 

Of these utilities, 33 were defined by us 
(with Bell's concurrence) as not to be por- 
ted. These included the vpm and rje fami- 
lies of utilities and the games for which 
we had no source (such as Adventure). 
The absolute debugger adb(l) was also 
not to be ported since the symbolic 
debugger sdb( 1 ) supersedes it. Twenty 
more utilities were deemed to be optional 
and were to be included in a subsequent 
release. These included most of the games 
and the graphics utilities. The number of 
utilities we are talking about here is thus 
approximately 250. 

These utilities represent 287,606 lines 
of C source code in 960 source files. 
Present to control their compilation are 
120 makefiles. 

Nonportability issues 

At the outset of the project, the utilities 
group did not have a clear idea of what 
sorts of problems would prove most trou- 
blesome. We had heard about the hibyte- 
lobyte problem (discussed later), and we 
suspected that some utilities, such as 
sdb(l). were by their nature extremely 
machine dependent. We eventually got a 
document from Bell called the "Port 
Acceptance Criteria" (see references), 
which gave estimates of the portability of 
all source files in the system. This docu- 
ment gave us some rough indications of 
the trouble spots, but by no means did it 
indicate all the problems. 

At this point we might have run whole- 
sale compilations of utilities for the 
M68000 and just tested them on our target 
system. Unfortunately, wc had neither 
cross compiler nor target kernel at that 
time, so we had to do as much work as 
possible on the host VAX. 

The first exercise performed by the 
group was the lint(l)/grep(l) search, 
Lint( I ) (a utility designed to flag sus- 



picious C language constructs) was run 
with the option string -abhuvxp on all util- 
ity source code. This option string sup- 
presses everything except possible por- 
tability problems. Even with this 
suppression, lint( 1 ) generated an enor- 
mous number of complaints, mostly 
relating to pointer casts and other slightly 
tainted uses of pointers. Because of its 
overwhelming size, the lint(l) output was 
not useful to us and wc disregarded it. 

In concert with the lint(l) exercise, a 
grcp( I ) source code scan on the utilities 
was also done. We searched for all occur- 
rences of the strings word, byre, and 
union . This search was done with a known 
problem in mind, the hibyte-lobyte prob- 
lem, i.e., the known difference in signifi- 
cance ordering of bytes between the 
source and target machines. 

Though we knew it would be a prob- 
lem, we were unsure of all its possible 
manifestations. The hibyte-lobyte prob- 
lem is a good example of the interaction of 
architecture and the porting process. 
Since most of us had never before worried 
about such DEC idiosyncrasies (it took 
several patient explanations by one of the 
more avuncular members of our team 
before we understood why unions, for 
example, could cause the problem while 
masks and shifts could not), this grep(l) 
search turned out to be useful. Although 
most of the findings were false alarms, 
such as the word password in the source, 
some real problems were discovered. 

Following an initial analysis of the 
grcp(l) data for hibyte-lobyte problems, 
it was noticed that many machine- 
dependent areas had already been iso- 
lated. These areas were bracketed by con- 
ditional compilation directives with code 
inclusion based on the target machine. 
The machines defined included: VAX 
1 1/780, PDP-1 1 , AT&T 3B20S. and the 
IBM 370. The presence of these condi- 
tional compilation directives in a source 
code file was taken as prima facie evi- 
dence that the code required inspection 
for portability problems. 

Thegrep(l) exercise finally resulted in 
a table of rough portability estimates. For 
each file, presence of any of the following 
suspicious constructs was noted: 
■ References to /dev/mem or 
/dev/kmem. Such references meant that 
the utility depended upon the structure of 



memory, which differs somewhat from 
port to port because of memory manage- 
ment considerations. 

■ References to object file format. Such 
references were important to us because 
we were going to use the new Common 
Object File Format (COFF) for our object 
files, while the system we were porting 
from used this format's predecessor. The 
only difference between the two is that the 
new COFF uses a string table to store 
arbitrarily long identifiers in the object 
file; the old format had limited-length 
identifiers. 

■ Presence of machine conditional com- 
pilation directives. It seemed reasonable 
to us that places containing conditional 
compilation directives warranted 
inspection since others found machine 
dependencies there. 

■ Presence of the words word or byte . By 
searching for the words word or byte wc 
were trying to find comments describing 
any byte-order dependent coding 
practices. 

■ Presence of the word union . As 
described later, unions provide a way for 
C code to be machine dependent. 

At this point, wc began examining by 
eye all source code indicated as suspicious 
and making any changes of which wc 
were sure. (All our work was being done 
under Project SCCS control, of course. 
See COMPUTER LANGUAGE Nov. and 
Dec. 1984.) Eventually, as we got our 
compiler (a Bell SGS II cross compiler 
running on the VAX and generating code 
for the M68000) and as our target system 
became more stable, more and more test- 
ing was possible. The rest of this section 
is an itemization, in retrospect, of the C 
language portability problems we encoun- 
tered in porting the utilities to the 
M68000. It should be a useful guide for 
anyone who needs to do similar work. 

Hibyte-lobyte problem. One of the 
problems in some of the utility code 
involved the hibyte-lobyte issue. This is 
the classic UNIX system portability prob- 
lem. It refers to the difference in signifi- 
cance ordering of bytes within short 
( 16-bit) or long (32-bit) words. 

On DEC equipment, the first (lowest- 
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addressed) byte of a mulcibyte integer is 
the least significant, while on most other 
machines, including the M6800O, the first 
byte is the most significant. In most ordi- 
nary C programming, this difference is of 
no consequence. Ft is possible, however, 
to write C code that has different effects in 
these two environments. 

For example, if we declare the variable 
x as a union : 

union | char c[4]; 
int i; }x; 

and execute the assignment *./= 1 , then 
on the VAX, x. c[0] will be equal to 1 and 
x. cfJ/, x. c[2j, and x. c[3] will be equal to 
zero. On the EXORmacs, however, jr. c(3j 
will be equal to I and x.cfOf, x.cfJ], and 
x.c[2} will be equal to zero. In terms of 
bits, x looks like this on the VAX: 

00000001 
00000000 
00000000 
00000000 

and like this on the M680O0-based 
machine: 

00000000 
00000000 
00000000 
00000001 

There arc also a few other ways to 
invoke this machine dependency in C, 
such as writing data to a file in one binary 
format and reading it back in another. 
Shifts are not a problem. Regardless of 
the internal representation, compilers 
insure that, for example: 

x >> 10 

is, for any positive integer x , the same as 

x/1024 

Ourgrep(l) search caught most occur- 
rences of the hibyte-lobyte problem. It 
was a nuisance to fix, however. In the case 
of some utilities such as sdb(l), whose 
code is already complicated by being 
reworked by several generations of pro- 



grammers, it took a lot of study to deter- 
mine exactly how to fix the byte-order 
dependencies. The writing of byte-order 
dependent code is just a bad coding prac- 
tice. It can and should be avoided by all C 
programmers. 

Another ramification of this problem 
was that any files containing multibyte 
entities such as shorts or ints required 
selective byte-swapping before being 
downloaded to be run on the M680OO tar- 
get. This was not too difficult for COFF 
files, since we had a utility to do exactly 
this, but some data files used by the util- 
ities were more troublesome. We finally 
decided to create many of them on the tar- 
get machine instead of downloading them 
from the host. 

The utilities affected by this hibyte- 
lobyte problem included prs{l), 
tplot(lG), fsdb(lM), unpack(l), and 
sdb(l). 

aO/dO problem. An interesting por- 



The aO/dO problem 



On the VAX 

char 'mallocf . 



:: 



return(p); 



rO 



On the M68000 

char *malloc( . . . ] 



return(p); 



tability problem was the aO/dO function 
return problem. On the VAX, all function 
return values in C are left in the rO regis- 
ter by the compiler. Hence it does not 
matter on the VAX whether a function is 
declared, say, to return an int or a pointer, 
the returned value will always be in rO. 
The M68000 compiler, however, returned 
ints in the dO data register and pointers in 
the aO address register. Mismatched func- 
tion declaration/invocations thus caused 
the return of garbage for us. 

Figure 1 shows how this can happen. 
The procedure mallocf) is a frequently 
used library function that returns a pointer 
to some free space. Its definition is repre- 
sented on the left. It is shown as being 
invoked by the program on the right 
which has, however, an incorrect declara- 
tion for it. Instead of: 



main() 

jint mallocj); 

char *p; 



p = (ctiar *)malloc(s); 



mainQ 

jint malloc'l); 

char "p; 



p=(char *)malloc(s), 



aO 

dO 



Figure 1. 
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char *malloc(); 

it has: 

int mallocQ; 

(Actually, the declaration in the calling 
program was simply missing, but since 
the type defaults to int . the effect is the 
same.) In the case of the VAX. the 
returned value was put in the rO register 
by malloc and was retrieved from that reg- 
ister by the calling program, so all was 
well in spite of the bug. 

In the case of the M68000, however, 
malloc put the returned value (a pointer) 
in the address register aO but the calling 
program looked for it in dO where a 
returned int would belong. The calling 
program therefore used garbage from dO 
instead of the pointer in aO. (It was later 



found that the values remaining in dO were 
typically numbers like 0, 1 , or 2, which 
were left over from previous temporary 
calculations and function calls.) 

Because of the explicit pointer cast in 
the assignment: 

p = (char *)malloc(sizeof(buf)); 

no compiler warning was given. By using 
these small garbage numbers instead of 
pointers to legitimate free space, we were 
effectively using the text (instruction) 
space at the beginning of user memory as 
a free memory pool! The cause of the bug 
was only discovered after read-only text 
segments were implemented and we 
experienced segment violations trying to 
write to write-protected segments. It is 
perhaps a testimony to the robustness of 
that UNIX system that programs actually 
ran fairly well in this state. 

Utilities rendered nonportable by this 
bug included fsck(lM), dc(l), filc(l), and 
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gctty(l M). Diff3( I ) had a similar problem 
involving an undefined return value, 
which prevented it from working cor- 
rectly on the M68000. 

Padding problem. Here was another 
example of a bug that happened to be 
symptomless on the VAX but was deadly 
on the M68000. In the nroff( 1 ) code was a 
structure element declared as charzz; in 
one place and char *zz; in another. 

On the VAX this was innocuous since 
the field was padded to a 4-byte boundary 
on that machine and the char took up as 
much space as the pointer. The M68000 
SGS II C compiler, however, pads to 
2-byte boundaries. The char type is allo- 
cated 2 bytes and the pointer is allocated 
4, so that all items in a data table follow- 
ing zz arc off by 2 bytes. The symptom 
produced by this bug was rather amusing 
The characters output from nroff( 1 ) were 
shifted one position in the ASCII map. 
For example, F became G, P became Q. 
and Hello World became Ifmmp Xpsme. 

Figure 2 illustrates, in a simplified 
form, what happened. At the top of Figure 
2 are two structure declarations, inconsis- 
tent with each other. In the first, zz is 
declared as a char type and actually 
occupies I byte of storage. The VAX com- 
piler forces the following array to start at 
a 4-bytc boundary, however, so 3 bytes of 
padding arc inserted between zz and the 
array a . When the entire structure is 
dumped to a file, it therefore occupies 1 
+ 3 + 26 = 30 bytes. 

If the file is then read in by a program 
that thinks the structure is as defined on 
the right, 4 bytes are read in for zz (now a 
pointer) and 26 bytes are read in for the 
array a . The original 30 bytes are read 
back in and everything is hunky-dory. 
Again, the bug is masked. 

The bottom of Figure 2 shows what 
happens on the M68000. In the structure 
on the left, ;; is 1 byte as before, but now. 
since the M68000 only requires padding 
to a 2-byte boundary, only 1 byte of pad- 
ding is added. The total number of bytes 
written out is 28. When the program using 
the structure declaration on the right then 



o b c . . ,"z| 



[on disk) 



Figure 2. 
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tries to read the disk, it wants to read 30 
bytes. After reading in 4 bytes for the 
pointer, it now reads in the array a , which 
is consequently shifted by 2 bytes over the 
originals. 

The nroff( l)/troff( 1 ) system contains 
about 1 80 files and working on this prob- 
lem consumed at least 10 man-days just 
before we were scheduled to send SYS- 
TEM V/68 to AT&T for approval. This 
bug nearly delayed submission of our por- 
ted system. What made it difficult to find 
was that it was a bug present in the VAX 
code but symptomless because of a coin- 
cidence. On the M68000, that coincidence 
no longer held. 

The padding problem also complicated 
our debugging of the symbolic debugger 
sdb(l). In initial stages of our work, we 
were debugging this utility on the VAX by 
transporting core-dump files created on 
the M68000-based machine back to the 
VAX. We had to write a small utility to 
massage the user structure within the core 
file to the VAX-style structure padding. 

Flexnaine problem. Syntactically, our 
SGS II cross compiler for the M68O00 dif- 
fered in several ways from the resident C 
compiler on the VAX. Forexample. our 
new compiler supported arbitrary-length 
identifiers, with all characters considered 
significant, whereas the resident VAX 
compiler considered two identifier names 
the same if they agreed in the first seven 
characters. 

One might think that the new feature, 
which in a sense subsumed the old, would 
not cause any portability problems. How- 
ever, here is what happened: the old code 
would contain two variable references 
such as baseaddress and baseaddr with the 
intent that they refer to the same thing. 
Under the new compiler, they would no 
longer be considered the same and prob- 
lems would arise. I have always hated the 
compiler feature that allows one to use 
long identifiers but only attaches signifi- 
cance to the first few. This confirmed my 
dislike. 

Utilities affected by this problem were 
uucp(lC). sdb(l),expr(l), wall(IM), 
mail(l), and newform(l). 



Prepended underscore problem. The 

resident compiler on the VAX prepended 
an underscore to all C variable names, 
and these augmented names were passed 
on to the assembler and ended up in the 
symbol table. Our SGS II compiler did not 
prcpend underscores. Utilities that had to 
be modified because of this difference 
were ipcs(l), ps(l), fuser(lM), and 
sdb(l), all of which looked at symbol 
table information. 

sdb(l). The port of this utility is a sin- 
gular case since it is extremely machine 
dependent, involving disassembly, setting 
breakpoints, single stepping and reading 
object modules and core files. The port of 
this utility alone took about one man-year 
(see "Experiences in Porting UNIX SDB 
to the M68OO0" in references). 

sh(l). Although the shell was sur- 
prisingly portable, it had a few 
problems— most minor but one serious. 
One minor problem was that our compiler 
no longer accepted the obsolescent, 
ambiguous C constructs =+ and =-. 
These had to be changed to the currently 
accepted + = and - = . 

On a more serious note, the shell had an 
unusual way of expanding its data seg- 
ment at run time. It simply kept making 
data accesses until it generated a memory 
fault signal, then caught the signal, 
requested more memory, and proceeded. 
On the M68000. it was not possible for us 
to catch this signal. We therefore had to 
check for possible memory faults before 
exceeding the segment limit. 

Null pointer ref problem. In C, a 



string variable is a pointer. It points to a 
sequence of bytes terminated by a byte. 
This is represented in Figure 3(a). A vari- 
able representing a null string is thus a 
pointer to a zero byte, for example: 

s[0] = '\0'; 

makes the value of s a null string. This is 
depicted in Figure 3(b). The assignment: 



0, 



is something quite different. It makes the 
string pointer s point to memory location 
0. The value of the string itself is what- 
ever happens to be at memory location 0. 
If we try to print this string out with the 
statement: 

prinrf("%s",s) ; 

we would get a string of ASCII characters 
representing whatever was at location 0. 
The string would go on until a null charac- 
ter (0) were encountered. 

The UNIX System V code contained 
something similar to this. The variable s 
was declared as: 

static char *s ; 

and then, under a certain chain of circum- 
stances, was printed out before anything 
was assigned to it. (Under C, statics are 



The null pointer reference problem 

(a) An ordinary string 
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(b) A null string 
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(c) A zero string pointer 
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data 
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Figure 3. 
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initialized at 0, so this is equivalent to 
assigning to s .) 

Well, what is at location zero? Location 
zero is always the first word of the text 
space of a UNIX program— for example, 
see Figure 3(c). (Text is UNIX jargon for 
instruction space.) On the VAX, the first 
byte of text space is a register mask which 
always happens to be 0. Therefore, it just 
so happens that an uninitialized static 
string is null and will not appear as gar- 
bage when printed out. 

This is, however, bad coding practice 
and is another example of a hidden bug 
waiting to cause problems when the code 
is transported to another machine. If one 



prints J out on the M68000, there happens 
to be no register mask, and one gets gar- 
bage in the form of instructions inter- 
preted as ASCII characters. This affected 
the utility a wk(l). 

Few problems due to C 

I do not want to give the impression with 
this paper that I think C has substantial 
portability problems. The fact that we 
went through several hundred thousand 
lines of code and found only a few por- 
tability problems attributable to C or C 
coding practices is amazing. 

Most of the C portability problems we 
found were really in the form of latent 
bugs— that is, bugs which were masked 
on the original system by some coin- 
cidence and were revealed only after the 
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port. These include the aO/dO, structure 
padding, flcxname. and null pointer refer- 
ence problems. In some cases, however, 
such as the hibytc-lobytc issue, the prob- 
lem was not covert bugs but simply poor 
coding practices. The hibyte-lobyte prob- 
lem can and should be avoided. 

Of the 250 utilities mentioned at the 
beginning of this paper. 207 were found to 
be literally source-code portable from the 
VAX to the M68000-based EXORmacs 
development system. Most of these prob- 
lems were related to machine architecture 
and minor compiler differences. Experi- 
ence in finding and dealing with these 
problems greatly facilitated further por- 
ting work we did, such as the UNIX Sys- 
tem V Release 2 port.BW 
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Subject: A complete Kit ot compilers, 
cross compilers and assemblers. 

The Amsterdam Compiler Kit is the 
only C and Pascal UNIX package 
which Includes a wide range ot native 
and cross tools. The Kit is also easily 
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new target machine. 

'A source UNIX or C license is required 
from AT&T. 
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Subject: C Cross Compiler 
lor the 8086 Family. 



The Lattice C Cross Compiler 
allows the user to write code on a 
VAX" (UNIX or VMS'") or MC68000 1 " 
machine for the 8086 family. Lattice C 
is a timesaving tool that allows a more 
powerful computer to produce object 
code for the IBM-PC". The compiler 
is regarded as the finest C compiler 
for the 3085 family and produces the 
fastest and tightest code. 
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machine to create standard Intel ob- 
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SuperSoft Languages 

When Performance Counts 



A programmer's most 
important software tool is 
the language compiler or 
interpreter he uses. He has 
to depend on it to work 
and work well. 

At SuperSoft, we believe it. 
That's why we offer four 
excellent compilers: 
SuperSoft FORTRAN, 
SuperSoft A SuperSoft C, 
and SuperSoft BASIC. They 
answer the programmer's 
need for rock solid, 
dependable performance 
on microcomputers. 



SuperSoft A 

A true Ada* subset 

SuperSoft A is a completely standard 
subset of the Ada language, incor- 
porating approximately 63% of the 
standard Ada syntax and including 
such important features as packages 
and separate compilation. For 
CP/M-80 microcomputers: 5300. 

SuperSoft C 

SuperSoft C is a high-powered, full- 
featured C compiler designed for 
serious C applications. It is fast- 
both in compilation and execution, 
and it is packed with more than 200 
library functions (all delivered in 
source code form). SuperSoft C 
produces optimized assembly code, 
and object code can be ROMed. 

SuperSoft C (for CP/M-80, CP/M-86, 
MS DOS, PC DOS): $350 



SuperSoft 
FORTRAN 

With large code and data. 

SuperSoft FORTRAN version 2.0 
with large code and data space 
is now available under MS DOS 
and PC DOS. It gives you the 
power to compile extremely large 
FORTRAN programs on micros. 
It allows double precision and 
complex numbers, full IEEE float- 
ing point, and a full range of other 
important features for the serious 
FORTRAM programmer. Both 
8087 support and a RATFOR pre- 
processor are optionally available. 
FORTRAN (CP/M-80 & 86. MS 

DOS, PC DOS): 5325 
8087 support: $50 RATFOR: $100 



To order call: 800-762-6629 
In Illinois call 217-359-21 12 



In conjunction with SuperSoft. SuperSoft FORTRAN was developed by Small Systems Services. 
CJrbana. IL, a leader in FORTRAN development- 
Japanese Distributor. ASR Corporation International. TBL Building. 7th Floor, 1-19-9 Toranomon r 
Minato-Ku, Tokyo 105. Japan Tel 03-5025550. Tetex 222-5650 ASRTVQ J. 

"Ada is a trademark of the Department of Defense 
PC DOS ts a trademark of International Business Machines. 
MS DOS is a trademark of Microsoft 
CP/M-80 and CP/M-86 are trademarks of Digital Research, Enc. 
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SuperSoft 
BASIC 

The SuperSoft BASIC compiler lets 
you get serious with business and 
financial programs. It uses BCD 
math to give you highly accurate 
results for demanding applications. 
SuperSoft BASIC is a true native 
code compiler that is generally 
compatible with Microsoft's BASIC 
interpreter. And an additional 
bonus - no run time license fee is 
required. 

SuperSoft BASIC Compiler (for 
MS DOS, PC DOS, and CP/M-86): 
$300 

Also available for programmers: 

Star-Edit, a full-featured 

programmer's text editor: $225.00 
Disk-Edit, an invaluable 

programmer's disk data editor: 

$100.00 



SuperS ft 

SuperSoft, Inc., 1713 S. Neil St., 
P.O. Box 1628, Champaign, IL 61820 
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A spreadsheet 

becomes a development environment 



I 



Symphony 
Command 
Language 




ow is a spread- 
sheet program 
like a piano? To 
many 

musicians, the piano is the ultimate 
instrument— an orchestra for a single 
player. Many microcomputer users per- 
ceive the spreadsheet the same way: it is 
their all-purpose computing tool. 

Multifunctioned spreadsheets like 
Lotus 1-2-3 have been used to model 
everything from business expenses to 
Conway's Game of Life and to perform 
everything from number crunching and 
business graphics to simple word pro- 
cessing. Using 1-2-3's macro facility, 
some people have even built templates 
that can almost— but not quite— serve as 
turnkey application packages. 

Now Lotus Development Corp., the 
maker of 1 -2-3 , has given us Symphony, a 
combination spreadsheet, data base, word 
processor, graphics, and communications 
package. Most importantly, this prodi- 
gious program offers what 1-2-3 lacked 
for building turnkey applications: a true 
programming language called, appropri- 
ately, Symphony Command Language 
(SCL). 

In this article we'll audition SCL 
and learn how to write SCL macros. We'll 
describe one of the program's bugs plus a 
significant but undocumented feature. 
And for an encore, we'll present some 
macros that are surprisingly useful and 
entertaining. (You'll find these selections 
and more in the file SCL.WRK on the 
COMPUTER LANGUAGE Bulletin Board 
Service and CompuServe CLM SIG.) 

So quiet, please, the performance is 
beginning. 



By Darryl Rubin 

Classical quintet 

Lotus calls Symphony an integrated pro- 
gram and. indeed. Symphony includes 
what has quickly become the classical set 
of five functions for this category of soft- 
ware: spreadsheet, word processing, data 
base, graphics, and telecommunications. 

What makes Symphony unique is how it 
ties these five functions together. Other 
integrated programs implement their 
major functions as distinct environments 
between which you must explicitly trans- 
fer data. Not Symphony. This performer 
implements all its functions within a sin- 
gle environment— a gigantic spread- 
sheet—so when you switch from one 
function to another what you're really 
doing is changing your mode of operating 
on the same, underlying data. 

And you can change modes as easily as 
a musician changes keys. Symphony 
offers multiple windows that you can 
independently pan, zoom, and switch 
from mode to mode. You may use multi- 
ple windows to view the same data in dif- 
ferent ways simultaneously. What's more, 
you can write SCL macros that manipu- 
late the underlying spreadsheet data with- 
out concern for how the data is being 
viewed. 

SCL programs can even manipulate 
themselves, because in true von Neumann 
style, they are stored in the spreadsheet 
along with the data they operate on. Think 
of Symphony as a virtual computer whose 
memory is a rectangular array of storage 
cells— the spreadsheet! 

Like the cells of any memory, those of 
the spreadsheet have both a value and an 
address. 

A cell's value can be one of two types: 
numeric or string ("label," in spreadsheet 



parlance). Furthermore, a value can be 
either constant (a literal) or calculated (a 
formula). For example, 3 and "Alpha" 
are literals, while + 1 +2 and 
"Al"&"pha" are formulas. 

Cell addresses can also be of two types: 
coordinate or range. A coordinate is sim- 
ply the row/column location of a single 
cell, while a range is the pair of coordi- 
nates at opposite corners of a block of 
cells. For example, Al and ZIOOarc 
coordinates, while A 1 . . ZIOOisarange 
of 2.600 cells. 

The nicest thing about cell addresses in 
Symphony is that you can name them 
symbolically. You could, for instance, 
define AVAR as a name for cell A 1 and 
ANARRAY as a name for the range 
Al . . Z100, Doing this is analogous to 
declaring variables in languages like 
BASIC and Pascal. In fact, the spread- 
sheet implements not just the program and 
data store for SCL but also its symbol 
table. 

The Symphonic formula 

The soul of any spreadsheet is, of course, 
the formula. Formulas arc what make a 
spreadsheet come alive and be responsive 
to the data you enter into it. But formulas 
in Symphony have an additional, higher 
purpose: they constitute the expression 
syntax of SCL. 

SCL's expression syntax is the stan- 
dard, algebraic one used in almost every 
language from FORTRAN to Ada. 
Included are the full set of arithmetic and 
comparison operators, plus string concat- 
enation {& ) and Booleans (#AND#. ttORtt, 
#NOT#). Here arc some example 
expressions: 
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(2A3) + 1 ;Resu!tis9 

A1>A2 ;Falseif A1=2,A2 = 3 

ATNDX ;6ifNDXisA2'sname 

C1&"!" /'Oh!", if CI = "Oh" 

SCL also sports a handsome repertoire 
of built-in functions, about 90 in all. 
Included are a full set of transcendental, 
logical, string, statistical, financial, and 
date/time functions. Let's highlight a few 
of the more unusual (for a spreadsheet) of 
these. 

Symphony's string functions arc one of 
its strengths. You can use these to nicely 
format spreadsheet titles, build models 
that operate on string data, and write SCL 
macros that work in the word processing 
mode. 

Lotus seems to have borrowed the 
string functions primarily from BASIC. 
You get ©LEFT, ©RIGHT, and ©MID for 
extracting substrings, ©FIND for search- 
ing a string (like BASIC'S INSTR), 
©REPT for repealing a siring. ©LENGTH 
for determining a string's length, and 
©VALUE for converting strings to 
numbers. 

The logicals seem to have been inspired 
by C. ©ISSTRING and ©ISNUMBER let 
you test whether an argument is a string or 
a number, while ©ISERR will tell you 
whether or not the argument expression 
produces a valid value. In a similar vein. 
©ISNA lets you check whether or not a 
value is available (i.e., whether a cell is 
blank). 

You can test these and other conditions 
using the function ©IF: 

@IF(COND,THEN_EXPR,ELSE_EXPR) 

This function returns the value of the 
THENEXPR if the COND expression is 
"true" (nonzero); otherwise it returns the 
value of the ELSE EXPR . For example, 
the following expression returns a 
cyclically incremented value based on an 
input value in Al and a limit value in a cell 
named LIMIT: 

@IF(A1 + 1>LIMITJ,A1+1) 

The ©IF function is actually a special- 
ized form of the more general 
©CHOOSEfl.EXPRI. . . EXPRN) . 



which returns the value of the /th expres- 
sion in the argument list. You can use this 
to implement a simple but crude kind of 
array access, as in: 

@CHOOSE(l,Al,A2,A3,A4,A5) 

Another way to do the same thing is to 
use the ©INDEX function, like so: 
©INDEXfAI . . A5.0.I) . This function 
implements two-dimensional array 
lookup, returning the value of the cell at a 
specified row/column offset from the ori- 
gin of the specified range. The range can 
be explicit, as in the preceding example, 
or symbolic : ©INDEXfANARRA Y, 
COL.ROW) . The macros wc present later 
put this function to excellent use. 

©INDEX is one of several functions that 
accept range specifications. Others 
include ©ROWS and ©COLS, which tell 
you the dimensions of a specified range, 
and the statistical functions ©SUM, 
©MIN, ©MAX, and ©AVG . For example, 
©SUMfANARRAY) will sum all the cells in 
the named range. Or try this out: 

AVG(ANARRAY,B101 .. B105,ZZZ) 

Yes, the statistical functions even 
accept a variable number of arguments. 
And I'm sure you'll have no argument 
with that! 

Macro maestro 

Now that we've mastered formulas, the 
question is, how do we make them play? 
Formulas are fine for writing expressions 
in SCL, but how are control structures 
expressed? Can we go beyond mere 
spreadsheet recalculation to create an 
orchestrated sequence of programmed 
actions? 

Indeed we can. Enter ihc spreadsheet 
macro. Lotus 1-2-3 introduced this con- 
cept. In that program, as in Symphony, a 
macro is basically a set of keystrokes 
recorded as labels in the spreadsheet. 

Suppose you have a cell named ACM 
that contains the string Association for 
Computing Machinery . In word pro- 
cessing mode, you could hit the user 
macro key (F7) followed by ACM <CR> 
and watch the acronym type itself. You've 
made a WP glossary feature out of a 
macro. 



As you can see, a Symphony macro is 
simply a label stored in a named range. 
This range can be a single cell . as in the 
preceding example, or a vertical column 
of them, as in Listing 1. 

When you invoke a macro, Symphony 
interprets the first cell in the named 
range, then drops vertically down and 
interprets the next cell, etc.: the crossing 
of cell boundaries is immaterial. Exe- 
cution stops when Symphony encounters a 
blank cell or the macro directive 
{RETURN}. 

You polished 1-2-3 users may gasp at a 
perfectly readable directive like 
{RETURN}. Gone are 1-2-3's cryptic IX 
macro commands. Replacing them are a 
much enhanced set of statements whose 
general syntax is: 

(KEYWORD ARG1,ARG2, . . ARGN) 

Symphony provides two classes of 
macro keywords: key names and control 
statements. 

Key names are symbolic names for 
nonalphanumcric keys like the cursor 
controls and function keys. These include 
{UP}, {DOWN}, {LEFT}' {RIGHT}, 
{PGUP}, {PGDN}, {ESC}, and {BS}. All 
key names take an optional, numeric 
argument that serves as a repeat count. 
For example, the following label in a 
macro cell will type the string BRAVO! 
and then backspace over it: 

BRAVO!{BS6| 

Some of the other key names you can 
use are {ZOOM}, {CALC}, {MENU}, and 
{SERVICES}. The last two are especially 
important because they invoke Sym- 
phony's two top-line menu bars, {MENU} 
for the mode-specific menu bar and 
{SERVICES} for the global services bar. 
The macros we'll discuss later give these 
key names a real workout, but here's a 
preview: \MENU}IR ~ . 

Obviously Lotus has left some parts of 
SCL cryptic! But if you know Symphony, 
you'll recognize this as the keystroke 
sequence to perform the Insert Row func- 
tion (the tilde is interpreted as a carriage 
return). The inverse function to delete a 
row is [MENU\DR ~ . 
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Unfortunately, you'll have to watch out 
if you want your macros to insert and 
delete rows or columns like this, because 
Lotus's programmers missed a beat when 
writing this version of Symphony. You 
see, Symphony doesn't check whether 
spreadsheet insertion or deletion shifts an 
executing macro horizontally or verti- 
cally; if it does, execution resumes in, 
ahem, the wrong cell. 

Besides key names, SCL provides a set 
of control statements for branching, con- 
ditional execution, and looping. Bran- 
ching is as simple as writing {BRANCH 
LOC\; control transfers immediately to 
the specified cell. Conditional execution 
looks like this: {IF COND}. If COND is 
true, execution continues" in the same cell, 
otherwise it skips to the cell below. 
Shades of BASIC'S limited IF\ This cer- 
tainly isn't the block-structured IF/THEN/ 
ELSE you might have expected. 

For more of the unexpected, look at 
this: 



(FOR CNTR,START,STOP,STEP,LOC} 

Here we have SCL's loop statement. 
CNTR designates a cell where the loop 
counter will be stored. START is the start- 
ing value for this counter, STOP and STEP 
should be obvious, and LOC is the name 
or coordinate of a macro that should be 
used as the loop body. Seem strange? Per- 
haps, but it makes sense: think of the FOR 
statement as an iterated procedure call. 

Speaking of procedures— writing them 
is a snap, because every macro you define 
becomes an SCL statement name like any 
other. For example. Listing 1 shows a pair 
of macros named {PUSH] and {POP] that 
implement a numeric stack within the 
spreadsheet. Here are some examples of 
using them: 



(PUSH 1} 
{PUSH AVAR} 
(POPHPOP} 



; Push a literal 
;Push a cell 
;Popbcrh 



As you can see, {POP] takes no argu- 
ment; ii always returns its value in the cell 
named ELEMENT. This is because argu- 
ment passing in SCL is by value only; 
procedures can't pass results back out 
through the parameters. 

These two macros illustrate some more 
of SCL's statements. First is {DEFINE 
LOC], which {PUSH ] uses to specify a 
cell where the incoming parameter is to be 
received. Macros that take several param- 
eters can specify multiple parameter cells 
by saying {DEFINE LOCI, . . LOCN]. 
All incoming parameters are assumed to 
be strings unless the suffix -.VALUE is 
appended to the location name (Listing 1). 

The next statement of interest is SCL's 
assignment statement. {LET LOC , EXP R]. 



{PUSH} and {POP} macros 



;NOTE: For this and Listings 2 and 3, labels are in Col A, 

; statements in Col B, and comments in Col C. Highlight Col A and 

;use Range Name Labels Right command. 

element ; Stack element being pushed or popped 

top ; Top of stack index (preset it to 0) 

stack ; *** MAKE A RANGE "stack" in col B spanning rows as needed: 

(2nd row of stack range) 

*** End of "stack" range (insert rows as needed) 

; Push — Push a number on a stack, ie {push num) 
push {define element: value} ; Define cell for input arg 

{put stack, 0, top, element} ; Put arg_on stack, then increment 

{let top,@if (top+l>@rows(stack) ,@err ,top+l) } ; top pointer 
{return} 



pop 



; Pop — Pop a number and return in cell "element", ie {pop} 

{let top,@if(top<=0,@err , top-1)} ; Point back to top element 

{let element, @index(stack,0, top) } ; Pull it off stack 

{put stack,0,top," "} ; Then blank that stack cell 

(return} 



Listing 1. 
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It stores the value of the EXPR at the 

specified location. Due to a peculiarity 
(bug?) of Symphony's, it's a good idea to 
force a spreadsheet recalculation after 
every [LET] (the tilde after each {LET} in 
Listing 1 accomplishes this if automatic 
recalculation is enabled). The 
recalculation is necessary to assure that 
all references to the assigned cell will 
immediately reflect the new value. 

Listing 1 also illustrates a variant of 
\LET\ called {PUT). Its syntax is {PUT 
LOC.COL.ROW.EXPR) and what it does is 
perform an assignment to an array cell . 
where LOC is the origin (upper left cor- 
ner) of the array and ROlVand COL are 
the relative offsets from the origin. This is 
the inverse of the @INDEX function we 
described earlier, which retrieves a value 
from an array. 

Pictures at an Exhibition 

{PUSH} and {POP} are useful but. ho 
hum, dull. For something with a bit more 
flash, check out Listing 2. Here we have a 
macro that is quite literally flashy, 
because it implements a slide show! 

To try it, create and lay out your slides 
on the monitor as windows for which you 
have set Window Settings Restrict Range 
Screen. Next, set up a named table that 
lists the slides to be presented (see the 
SLIDEMO table in Listing 2). Then hit 
Alt-S, sit back, and enjoy. 

You might ask how the macro became 
bound to the Alt-S key. The answer is the 
macro's special name, \5. Change the S 
to any character from A to Z and the 
macro would be bound to that Alt key 
instead. 

The first thing the slide macro does is 
use {CETLABEL) to ask where the slide 
table (i.e., program) is. Much like 
BASIC'S INPUT statement, this one issues 
a prompt and returns a string typed by the 
user. Its syntax is {GETLABEL 
PROMPT.LOC). where PROMPTS the 
prompt string and LOC is the location 
where the user's response should be 
returned. 

For inputting numbers rather than 
strings, SCL has a complementary 
iGETNUMBER] statement. One caution 
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on using either statement, however: you 
must force a spreadsheet recalculation to 
ensure that formulas referencing the input 
cell (LOC) immediately reflect the new 
value (in Listing 2, the tilde after the 
{GETLABEL} statement accomplishes 
this). 

Having asked for the range name of the 
slide table, the slide macro next uses a 
{FOR } loop to process each entry in that 
table. Notice how it determines the num- 
ber of slides to iterate over by using 
@COUNT. This handy function counts the 
number of nonblank cells in a specified 
range, which in the case of the slide table 
will be twice the number of si ides to be 
shown (remember, the slide table has two 
columns). 

QCOUNT's general syntax is 
@COUNT(RANGE) . So what's that 
strange @@(SLIDES) argument we're 
passing to ©COUNT in Listing 2? It's not 
a range name nor coordinate pair, obvi- 
ously; it is an undocumented function, 
one that provides an important, indirect 
range naming capability. 

Anywhere SCL allows a range name 
you can code @@(LOC) instead, and SCL 
will use the label contained in LOC as the 
range name. The slide macro uses this 
function to operate on a slide table speci- 
fied interactively by the user, as opposed 
to one hard-coded into the macro. A cau- 
tion, however: force a recalculation 
before using @@(LOC) to ensure that it 
accesses the most recent value stored at 
LOC. 

The {FOR} loop we just analyzed 
repeatedly calls the macro procedure 
SHOWSLIDE, which does the actual work 
of showing each slide. SHOWSLIDE\ 
trick is how it uses a {LET} statement to 
copy the current slide name into the body 
of the procedure. There, the name 
becomes part of the \SERV!CES}WU 
(Window Use) command executed by 
SHOWSLIDE to display the slide's win- 
dow. This is one example of how SCL 
macros can modify themselves to good 
effect, but there is an even more powerful 
way, as we'll see next. 

Space opera 

Do your spreadsheets lack depth? Do you 
feel constrained by a table's two dimen- 
sions? Then you'll like our finale, a macro 
that projects Symphony's spreadsheet into 
three dimensions (Listing 3). 



A 3D spreadsheet is a vertical stack of 
2D spreadsheets that have the same for- 
mat but different data— say, expense 
reports for each month of the year. To cre- 
ate one, first enter a model into the 
spreadsheet that will serve as a template 
for creating the stack of data planes. Then 
hit Alt-T and respond to the prompts for 
the range name of the model and the depth 
of the 3D stack to create. 

The 3D macro will copy the model 
plane to create the requested number of 
data planes in a vertical column below the 
model. It will then position the cursor to 
the origin of the first data plane. Each 
data plane will have a range name of 
MODELS, where MODEL is the name 
you specified for the model plane, and 
"i" is a number from 1 to the number of 
data planes.. 

You may now flip from plane to plane 
(Alt-N, Alt-P) with the cursor staying at 
the same relative coordinates, or you may 
put into the current cell a formula that 
consolidates values from other planes 
(Alt-C). 

The 3D macro makes extensive use. of 
SCL's capability for self-modifying mac- 
ros. The slide macro presented earlier 
showed how to modify a macro cell by 
using {LET) to assign it a value. 3D's 
flourish is to include formulas within the 
cells of the macro. 

We said earlier that a macro is a vertical 
column of cells containing labels that 
Symphony interprets as keystrokes and 
macro commands. But a macro cell can 
instead contain a label-producing for- 
mula, in which case that formula's current 
value is interpreted by SCL. This lets you 
write macros whose behavior depends, 
via embedded formulas, on data else- 
where in the spreadsheet. 

The FILLPLANE procedure in Listing 
3, for example, uses formulas that depend 
on the MODEL and PLANE! variables to 
synthesize a keystroke sequence that will 
copy the contents of the model plane to the 
/th data plane and then position the cursor 
at the origin of that data plane. 

Listing 3 demonstrates another of 
SCL's strengths— its user-definable 
menus. When the statement {MENUCALL 



Illustration: Barbara Luck 
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FUNC] is executed by the N C macro, a 
menu of statistical functions is displayed 
according to the table named FUNC . 
Menu tables like this have one column for 
each command in the menu, with the com- 
mand name in the top cell and its help text 
in the next cell. The remainder of each 
column is the macro procedure to be 



called when that command is picked from 
the menu. 

The macro procedures of the FUNC 
menu are simple, for they are merely part 
of a keystroke sequence initiated by the 
\ Cmacro to fill the current cell. The 
result, however, is that the menu-selected 
function name becomes part of a formula 



that makes the cell display the consoli- 
dated value of corresponding cells in 
higher numbered planes. This macro 
starts simple, but what a finish! 

Unfinished Symphony 

As full-featured as SCL may appear, it is 
an unfinished language— intentionally so, 



Alt-S — Macro to show a set of slides stored in windows 



slidemo 


slidel 




slide2 




slide3 




main 


slides 




n 




kb 




delay 





SAMPLE SLIDE RANGE: first col (col B) has slide (window) name, 

second (col C) has slide delay (seconds) 
3 ; Resize and modify contents of this range 
3 ; as needed. Note: pressing any key will 
3 ; cancel slide delay and advance to next slide. 
1 ; Trailing blank entries in slide range are OK 



Name of range defining slides to be shown 
Number of slide currently being shown 
Cell to store user keystroke 
Delay loop counter 

; Main loop: ask for range containing slide names 
; and cycle through them 

\s {getlabel "Enter range containing slide names: ".slides) 
{windowsoff } {paneloff ] 

{for n,0,@count(@@(slides) )/2-l , 1 , showslide} ; loop thru slides 
{windowson} {panelon} {return} 

; Routine to show current slide 

showslide {let nextslide,@index(@@(slides) ,0,n) } ;get slide name 
{servicesjwu ; go to slide's window 

nextslide _ ; <= window (slide) name put in col B by {let] above 

{windowson) {windowsoff} ; put slide on display 
{for delay, 0, @index(@@(slides), 1, n)-l, l.waitloop} ; Pause 
{if kb<>""} [get kb) ; Discard any user keystrokes 
{return] 



; Routine to delay for specified time or until key hit 
waitloop {blank kb} (look kb} ; Check for user keystroke 

{if kb<>""} {forbreak) ; End wait loop if keystroke 
{wait @now+. 000001} ; Else wait a second 
{return} 

Listing 2, 
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for Lotus has included in Symphony a 
unique add-in application interface. 

This interface defines a set of entry 
points and data structures by which inde- 
pendent software vendors, and perhaps 
ultimately users, can extend Symphony's 
capabilities or modify existing ones. Add- 
insare already available for accessing 



DOS functions, executing SCL macros 
from disk libraries, and more. 

Even ignoring these possibilities, the 
part of SCL we covered here is but a pre- 
lude to a work of much greater mag- 
nitude. SCL has scores of additional fea- 
tures to delight and challenge the 
practiced programmer. 



Indeed, because of its complexity and 
some of its quirks, SCL is not the easiest 
language to learn or use. Like the piano, it 
can be a versatile and expressive instru- 
ment . . . it just takes a little practice. Q 

Darryl Rubin is section manager for net- 
work products at ROLM Corp. 



Alt-T — Make a 3D spreadsheet from a model (template) range 

model ; Name of model range for creating planes 

depth ; Total number of planes to create 

planevars ; CREATE A RANGE "planevars" in col B spanning the rows 

; containing nexti, previ, planel, planerow, and planecol . 

; These cells contain formulas as follows: 
i ; Index (z coord) of current plane (set by macros below) 

nexti ; @if (i+l>depth, 1, i+1) <= Calcs index of next plane 

previ ; @if (i-l<=0, depth, i-1) <= Calcs index of prev plane 

planel ; +model&@string(i ,0) <= Calcs name of current plane 

; Next 2 formula cells maintain plane-relative cursor coords 
planerow ; @cellpointer("row")-@cell("row",@@(planeI) ) 

planecol ; @cellpointer("col")-@cell("col",@(a(planeI)) 

coordstr ; String form of plane coords, set by \c macro 

; MAIN ROUTINE: Ask for model range name and 3-D sheet depth 
\t {getlabel "Enter model range: ".model) 

restart [if @iserr(@rows(@@(model)))} (branch notfnd); Branch if bad range 
{getnumber "Enter 3-D sheet depth: ".depth) 

{windowsof f } {panelof f } ; suppress screen refresh 

[goto) ; go to model range 

; <= Formula in Col B: +model 
{for i , 1 , depth, 1 .makeplane) ; loop to make all planes 
{let i.l) ; point to first plane 

{goto) j go to first plane 

; <= Formula in Col B: +planel&"~" 
{windowson} {panelon} ; enable screen refresh 

{return) 

; Reprompt user until valid model range name is given 
notfnd {getlabel "Hit CR, highlight range, then hit CR again ".depth) 
{menujrnc ; Create range for user 

; <= Formula in Col B: +model 
~{?) ; Let user highlight range 

{branch restart) ; Back to mainline 

; Routine to create and fill new plane from model 
makeplane {down @rows(@@(model) ) } ; advance to origin of next plane 
{newplane) ; create range for the plane 

(fillplane) ; copy model to newly created plane 

{return} 

; Routine to create range for next plane 



newplane (menu)rnc 

; <= Formula: +planel 
{menu)rnd 

; <= Formula: +planel 

Listing 3 (Continued on following page). 
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do Range Name Create 

using name of new plane 
Now delete the range and 
recreate it. This hackery 



"(menujrnc ; is needed in case range 

; <= Formula: +planel&"~." ; already existed (don't ask). 

[down @rows(@@(model))-l] ; Anchor top left of range 

{right @cols(@@(model))-l}~ ; Anchor bottom right 

; Routine to copy model plane to new plane 



fillplane {menu}c 



{goto 
{return} 



Invoke Copy command 

<= Formula: +model&"~" (source of copy) 
<= Formula: +planel (dest of copy) 
New plane is now filled, go to its origin 
; <= Formula: +planel (range name to go to) 



; Alt-N: Go to next plane, preserving relative cursor coords 
\n {windowsoff } (panelof f} (recalc planevars] 
{goto) ; Go to origin of next plane 

; <= Formula in Col B: +model&@string(nexti ,0) 
{down planerow] ; Move cursor to same relative coords 
{right planecol} ; in new plane as in current plane 
{let i.nexti) ; Make next plane the current plane 
{windowson] (panelon) {return} 

; Alt-P: Go to prev plane, preserving relative cursor coords 
\p {windowsoff } {panelof f} {recalc planevars} 
{goto} ; Go to origin of previous plane 

; <= Formula in Col B: +model&@string(previ,0) 
{down planerow] ; Move cursor to same relative coords 
{right planecol] ; in new plane as in current plane 
{let i,previ} ; Make prev plane the current plane 
{windowson} {panelon} (return) 

; Alt-C: Put consolidation formula in current cell 
\c {recalc planevars) ; Ensure state reflects current coords 
{if i>=depth] (beep) {return} ; Quit if in bottom plane 
{let argument, "(") ; Initialize formula argument string 
{let coordstr,@string( planecol, 0)&", "&@string( planerow, 0)) 
{windowsoff) {menu]e ; Erase current cell in plane 
{push i} ; Save current plane index 

{edit)@{menucall func} ; Enter function into plane 

{for i,i+l , depth, l,bldargs) ; Append argument string 
argument ; <= Arg string built in col B by BLDARGS 

{bs}) {windowson) ; Terminate formula string 

{pop} {let i, element) {return} ; Restore plane index & exit 

; Routine to append arguments to consolidation formula 
; Each arg has the form @index(planename, planecol, planerow) 
bldargs (recalc planevars) 

( let argument , +argument&"@index( "SplanelS" , "&coordstr&") , " } 
(return] 

; Menu to prompt for consolidation function. Note: define a 
; range "func" spanning cols B through H in the next two rows, 
func Sum Average Minimum Largest Count DeviationVariance 

Sum the Average tMinimum oMaximura oCount theStandard Variance of 
sum avg min max count std var 
{return} {return} {return} {return} {return} {return} (return] 

Listing 3 (Continued from preceding page). 
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Programmers' Pfantasies 

by Phoenix. 



Phoenix makes programmers' dreams come true. 
With the best-engineered, highest performance 
programming tools you can find. A full line of 
MS-DOS® /PC DOS programs and utilities no 
other company offers. All designed to help you 
write, test and deliver the best programs possible. 
Top-of-the-line quality at a price you can afford. 



I'M 





Finally, A Lint For MS-DOS. 

Now you can get the full range of 
features C programmers working in 
UNIX'" have come to expect from their 
Lint program analyzer. 

With Pre-C™ you can detect structural 
errors in C programs five times faster 
than you can with a debugger. Find 
usage errors almost impossible to detect 
with a compiler. Cross-check multiple source files and parame- 
ters passed to functions. Uncover interface bugs that are difficult 
to isolate. All in a single pass. Capabilities no C compiler, with 
or without program analyzing utilities, can offer. In fact, Pre-C 
outlints Lint, since you can handle analyses incrementally. 

Pre-C's flexible library approach lets you maintain continuity 
across all the programs in your shop, whether you use Pre-C's 
pre-built libraries, pre-existing functions you already have, or 
some you might want to buy yourself. 

Plus, you're not limited to one particular library, and Pre-C 
keeps track of all the libraries you're using to make sure that 
code calls them correctly. $395. 




Still Fixing Bugs The Hard Way? 

Pfix' v, 86 Plus, the most advanced 
symbolic debugger on the market, elimi- 
nates the endless error searches through 
piles of listings. Locale instructions and 
data by symbolic name, using symbolic 
addresses. Handle larger, ovcrlayed 
programs with ease. 
An adjustable multiple-window display shows source, object 
code and data, breakpoint settings, current machine register 
and stack contents simultaneously. An in-line assembler allows 
program corrections directly in Assembly language. Powerful 
breakpoint features run a program full speed until a loop has 
been performed n times. 

With a single keystroke you can trace an instruction and the 
action will be immediately reflected in source, object, data, 
stack, and register windows. Another key begins a special trace 
mode that executes call and loop instructions at full speed. 
Designed to work with both Plink™86 and MS i: LINK linkaee 
editors. $395. 



Assemble Programs Twice As Fast. 

Pasm T ' ,l 86 will assemble MASM files 
two to three limes faster than MASM 
3.0. Pasm86 supports 8086/88. 8087. 
801 86 and 80286 processors. 

With Pasm86's built-in defaults, you 
can write code quickly since you won't 
spend hours learning all the control 
statements needed at the beginning of your program. You can 
define symbols on the command line. Decide whether you want 
error messages or not. And. put local symbols within proce- 
dures. $295. 




Get The Lead Out 

Of Binary File Transfer. 

Ptel™ is the universal binary file 
transfer program for MS-DOS 2.0 or 
higher. You can move binary files fast 
and accurately. Upload or download 
groups of files from Bulletin Boards 
or remote computers. Move files 
between dissimilar machines and 
operating systems. Ptel's advanced binary protocol. Telink™ 
offers bcttcr-than-Modcm7 accuracy and performance. Faster 
transfer speeds. An on-screen update of error correction, 
blocks transferred, and transmission lime. 

Includes popular Modem7 and XModem protocols. With 
checksum or CRC. Plus Kermil and ASCII. $195. 




Special Thanks to Gasten Andrey of Framingham, MA. 



Programmer 'i PlanUMc*. Prr-C and Pfifiish are rradcrnarr.3 nf Phtwni* Compute! 
Praiucu Cofponllgn 

MS-DOS ami MS arc rc(!iMcr.\i lraJcnurk> t,f Microsoft Crirjwratiim 

I11M i* a rciiislrrcJ ira.kni.iri. tit ln[erna[u>ruil Illumes* Machine* Cinporation 
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Maximize Your Program's Efficiency. 

Pfinish™ delivers the fastest running 
programs possible. This performance 
analyzer lets you "zoom in" on the inef- 
ficient parts of your program. Whether 
written in Assembly language. C. 
PASCAL. FORTRAN. BASIC. Unlike 
profilers available today. Pfinish under- 
stands the structure of your program and reports the amount of 
activity and lime spent in its subroutines or functional groups. 
Pfinish analyzes both overlaid and memory resident programs. 
Down to the instruction level. Reports arc displayed. Stored on 
disk. Or printed out. In tabular form or histograms. 

Do a dynamic program scan. Identify the most frequently 
executed subroutines. Find inefficient code that costs your pro- 
gram valuable time. Rank subroutines by execution frequency. 
$395. 



Why Work With A Primitive Editor? 

More than a powerful editor, Pmate™ 
is a text processing language. An emula- 
tor of other editors. A languuce-specific 
editor for C. PASCAL, and FORTRAN. 
Pmate can even run in the background! 
You get full-screen, single-key edit- 
ing. Ten editing buffers. Horizontal and 

vertical scrolling. A "garbage stack" buffer. A built-in macro 

language with variables, control statements, radix conversion. 

tracing and 120 commands that you can group and execute with 

a single keystroke. $225. 





Why Squeeze Your Program 
More Than You Have To? 

The Plink86 overlay linkage editor 
brings modular programming to 8086/ 
88-based micros. Write large and com- 
plex programs without worrying about 
memory constraints. Work on modules 
individually, link them into executable 

files. Use the same module in different programs. Change the 

overlay structure of an existing program without recompiling. 

Use one overlay to access code and data in other overlays. 

$395. 



Call (800) 344-7200. In Massachusetts (617) 762-5030. 
Or, write. 




Phoenix Computer Products Corp. 
1420 Providence Highway Suite 115 
Norwood, MA 02062 



XT jnd AT arc [rademirisof IrrtcrruTninal Hutinc Machines CiirpornlKin 

UNIX ii a ir.idtma.l ,.( AT&T Ml UhUJiiinc. 

Pj>mH6. PluBf. Plus, hcl , Tclink. pmoir and PSinkWS arc iradcmaik* .if Pluwriu Software 

Awavia-tei Ltd 

Intel i* a rcgiilcrcii IraUenwk i>f Inld CiirpiDraiwri 



Outside the US, contact: Lifeboat Japan, Tokyo, Japan. Telex 
#2423296 LBJTYO, Telephone: 03-456^101 • Rcpro Haganum 
(StevisBV), Dinther. Netherlands. Telex #39581 REHAGNL. 
Telephone: 01-720-74543. 01-720-75543 • Memory Data, Sundbybcrg, 
Sweden, Telephone: 46-8764-6700 ■ Roundhill Computer Systems, 
Marlborough, Wiltshire. UK. Telex #444453 AWARE G, Telephone: 
44^67254675. 

CIRCLE 65 ON READER SERVICE CARD 
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Whitesmiths sets yet another precedent 
with the first in a series of new portable standard C Compilers: 

C for the 8086 family 



Features: 

• Includes Pascal which conforms to full ISO 
{level 1) standard, plus popular extensions 
and long identifiers 

• C now has struct assignment, enumerations, 
plus other popular features and long 
identifiers 

• Supports all memory models from small to 
large, plus mixed pointer sizes and segment 
overrides 



• Source level portable debugger included 

• Generates assembler listings with 
intermixed source code 

• Multi-segment linker with direct or 
sequential libraries, plus librarian, 
assembler, and other object tools included 

• Source code of system interface library 
included 

• Library use fees included in purchase price 




Whitesmiths. Ltd. ♦ 97 Lowell Road ♦ Concord, MA 01742 ♦ 617-369-8499 ♦ Telex 750246 
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Getting 
J° Know 

PL/I 




L/I (Program- 
ming Language 
I) has been in 
existence for 
nearly 20 years now and so may be con- 
sidered one of the old-timers' languages. 
Some programmers who use Ada today 
may not know what they owe to PL/I, but 
language designers recognize some of the 
philosophy and feel of PL/I in Ada. This 
article is intended to present the flavor of 
this powerful and sometimes maligned 
language. 

Until the late 1970s PL/I was a lan- 
guage that was not commonly seen outside 
of universities and data processing depart- 
ments of large organizations. Because it 
was such a large language, it was too dif- 
ficult to implement on small computers 
and remained a language for main- 
frames—until PL/I subset G was 
introduced by ANSI and made imple- 
mentations for microcomputers feasible. 
Subset G sacrifices some of the facilities 
and features of full PL/I. but the program- 
mer can usually create any needed fea- 
tures as procedures, so the loss is not 
keenly felt. 

Until the advent of Ada, PL/I was 
probably the epitome of language design 
by committee. Nearly every imaginable 
feature was thrown into the language and 
the compiler kept getting larger and 
larger. Compared to the lean elegance of 
Pascal, PL/I is considered by some purists 
of language design to be a monstrosity. It 
has been called unteachablc, unlearnable, 



By Gary Sarff 

and inelegant. Some of these complaints, 
as with any language, are about a particu- 
lar implementation of PL/I, but many are 
justified. 

PL/I is implemented as a multipass 
compiler— the compiler will scan through 
the programmer's source code from 
beginning to end many times, generating 
all sorts of intermediate code and tables. 
This is quite different from Pascal, for 
example, which is usually a single-pass 
compiler. PL/I is simply too large and has 
too few restrictions on some things, such 
as declarations, to allow it to be a single- 
pass compiler. The number of passes var- 
ies with the implementation and the com- 
piler options specified , but it is rumored 
that on IBM mainframes PL/I compiles in 
anywhere from 96 to 150 passes! 

Nevertheless, PL/I is a quite useful and 
powerful language for the business as well 
as the scientific programmer. It was 
designed to be the language to replace all 
languages. It contains features of FOR- 
TRAN, COBOL, and ALGOL, three of 
the most commonly available languages 
of the lime. 

PL/I has separate procedures with 
local variables, a block structure, recur- 
sion, record variables, a full range of 
arithmetic and string operations, and 
numerous file I/O options. Recursion is 
not quite as transparent to the program- 
mer as in more modern languages such as 
Pascal and Ada. A procedure must be 
declared to be recursive when it is writ- 
ten, or a recursive call will be considered 
an error. This is really a concession to the 
optimizer so that it can produce better 
code for certain types of procedure calls. 

Statements 

A statement in PL/I has the form: 



{LABEL) {KEYWORD) {STATEMENT 
OPTIONS}; 

where all parts are optional. Labels are 

used to designate the destinations of 
GOTO statements, and the first character 
should be a letter. According to various 
IBM manuals and text books, PL/I has in 
excess of 380 keywords, statements, and 
options. Statements are terminated by 
semicolons, and more than one statement 
may appear on a single line. A complete 
program will contain a main procedure 
and probably some declarations. 

Declarations consist of declarations for 
variables and declarations for subroutines 
and subprograms. PL/I distinguishes sub- 
routines as procedures internal to a pro- 
gram written in the same language as that 
program, while subprograms are exter- 
nal, probably compiled separately from 
the main program and written in a differ- 
ent language. 

Unlike Pascal, PL/I declarations may 
be placed anywhere in the source program 
mainly because PL/I is a multipass com- 
piler. The first declaration is of the pro- 
gram that is to be compiled. It is of the 
form: 

program_name: PROCEDURE 
OPTIONS(MAIN); 

where OPTIONS(MAIN) signifies that this 
is the main program. Other entries valid 
in the OPTIONS option are FORTRAN, 
COBOL, and Assembler, which are used 
to link together subprograms written in 
those languages to a PL/1 program. 
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The last statement must be: 

END program_name; 

to signify (he end of the source program. 
Between these two statements, the user's 
subroutines, variable declarations, and 
main program can appear in virtually any 
order. 

Data types 

In the area of variable declarations. PL/I 
offers a rich assortment of data formats to 
the user. As a legacy from FORTRAN. 
undeclared variables have a default type 
based upon the first letter of the variable 
name. Variables starting with /through A' 
arc whole numbers (integer type). Vari- 
ables starling with A through H and O 
through Zand the symbols @, #, $ are 
considered to be floating point numbers. 
The explicit types of declarations for vari- 
ables are made with the PL/I DECLARE 
statement (Figure 1). 

For numeric variables, the base attri- 
bute may be either DECIMAL or BINARY. 
The scale attribute may be FIXED or 
FLOAT (denoting fixed point or integer 
and floating point or real). The precision 
attribute may have different allowable 
ranges depending upon the imple- 
mentation. The declaration in Figure 1 
specifies that variable PRICE is of the 
form XXXX.XX (six digits, two of which 
must be after the decimal point). 

Declarations can cause confusion to 
beginning learners of PL/1 because the 
language is so flexible. Numerous 
defaults are set by the compiler if the pro- 
grammer does not specify explicitly what 
he or she wants. Also, the order of key 
words in statements is not strictly laid out. 



Figure 2 presents more examples of 
declarations. 

The BINARY attribute causes numbers 
to be stored in their binary representation. 
This usually increases the speed of com- 
putations since simpler hardware is 
needed to perform arithmetic on binary 
numbers. The indices for loops and sub- 
scripts to arrays are usually declared to be 
fixed binary for speed and efficiency. 

Also from FORTRAN comes the 
declare mode attribute COMPLEX to 
declare a complex number, A sample dec- 
laration is: 

DECLARE NUM1 FIXED DECIMAL 
(8,3}COMPLEX; 

A variable called NUMI will now exist 
with the CO MPLEX attribute where both 
the real and imaginary parts of NUMI 
have precision XXXXX. XXX ..The COM- 
PLEX auribule can be used freely with the 
other base and scale attributes to form 
COMPLEX FLOAT BINARY (14) and so 
on. Such variables have values assigned in 
the natural notation of mathematics such 
as NUMI =4 + 3/, which will put 4 in 
the real part and 3 in the imaginary part. 
Arithmetic can be performed just as with 
all real variables, and a variety of func- 
tions such as CONJG(X) returns the com- 
plex conjugate of the complex number X. 

In deference to COBOL and the busi- 
ness programmer. PL/I offers the PIC- 
TURE declaration as follows: 

DECLARE GRAND_TOTAL PICTURE 
'99,999.99',- 

where the period specifies decimal point 
alignment and the nines specify that a 
digit (0-9) may appear here. 
The declaration is the same as; 



DECLARE PRICE DECIMAL FIXED (6,2); 



_Precision attribute 
Scale attribute 
Base attribute 
Variable name 



FIXED DECIMAL (7,2) 

in terms of precision and arithmetic 
results. The internal storage is one char- 
acter or byte for each digit of the number, 
one byte for the comma, and one byte for 
the decimal point. Picture declarations are 
used mostly for formatted I/O, similar to 
the PRINT USING statement found in 
many versions of BASIC. The difference 
is that arithmetic may be performed on a 
picture variable. 

Arrays arc declared in a straight- 
forward manner. 

DECLARE TEMP(1 : 10, 1:10) FIXED 
BINARY(31); 

makes TEMP a two-dimensional array 
with subscripts running from 1 to 10. 

Character strings are declared in two 
different ways: 

DECLARE STR CHAR(20); 

makes STR a character string with a 
fixed length of 20. Shorter strings placed 
in STR will be left justified and padded 
with blanks. PL/I also has a dynamic 
length string, declared as follows: 

DECLARE TWOSTRCHAR(20} VARY- 
ING; 

which means the maximum length of 
TWOSTR is 20, but it will change length to 
accommodate the data placed into it. 

PL/I also provides pointer variables as 
in Pascal, but they are not differentiated. 
A variable is declared POINTER, mean- 
ing it will hold a machine address, but it 
may hold the address of any PL/I data 
structure, not just a single type as in 
Pascal. 

As a really exotic feature, some imple- 
mentations of PL/I provide data types of 
various nations' currencies. A program 
may have numeric literals with an implied 
type of STERLING (U.K. currency). 

Assume the variable AMOUNT is 
declared as follows: 

DECLARE AMOUNT FIXED DECIMAL 
(7,0); 



Figure 1, 
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then the following assignment to 
AMOUNT at a STERLING literal: 

AMOUNT = 3.4.2L; 
/* Interpret as 3 pound 4 shilling 2 
pence */ 

will result in^lMOf/AThaving the value 
of 770 interpreted as British pence. 

PL/I also allows programmer control 
over the storage allocation attribute of a 
declaration. By default, variables arc of 
storage lypc AUTOMATIC . which means 
that they behave as variables behave in a 
block structured language— created and 
destroyed as execution enters and leaves 
various blocks. Variables may also be 
declared STATIC . in which case they 
always exist independently of the block 
they may be declared in. Or they may be 
declared CONTROLLED . in which vari- 
ous "generations" of a variable are main- 
tained by PL/I automatically on a push- 
down stack. The program only has access 
to the topmost incarnation of the variable, 
but new values can be pushed (using the 
statement ALLOCATE(variublc_nume) ) 
and popped (using the statement 
FREEfvariable _name) ) . 

PL/I is one of the few languages to pro- 
vide a programmer accessible stacks as a 
data structure. A complete sample pro- 
gram is shown in Listing 1. GETLISTis 
used for input and PUT LIST (or output of 
values. Comments star! with /* and pro- 
ceed until a */ is encountered. 

Notice the assignment of variables and 
calculations to variables of differing types 



and precisions. PL/I provides such con- 
versions automatically and indeed is quite 
happy to oblige the programmer by 
attempting to convert any type to nearly 
any other type. FIXED to FLOAT, DECI- 
MAL to BINARY to PICTURE, CHARAC- 
TER to FIXED to BIT strings, and many 
more. This is an anathema to proponents 
of strongly typed languages like Pascal 
and can admittedly cause many hard-to- 
track-down bugs, especially when the 
compiler does not inform the programmer 
what it is doing. 

Loops 

Loops in PL/I can be a confusing subject 
because so many obscure loop control 
statements can be written. PL/I has the 
normal iterative loop called a DO loop of 
the form: 

DO 1= 1 TO 10; or 
DOI=XT01 BY-l ; or 
DO J = - 3 TO 1 00 BY 4; 

Floating point values can also be used: 

DOSTEP = 0.0TO5.0BY0.1; 

PL/I also has an enumerated DO , as in: 

DO COUNT = 1TO10BY2J7TO33 

BY 3,50 TO 100 BY 5; or 
DO 1=4,5,1 1,-2,7,19,1; 

In the first example, COUNT will first 
go from 1 to 10 by 2, then from 17 to 33 
by 3, and last from 50 to 100 by 5. In the 
second example, / will successively take 



on the values 4, 5, 11, -2.7, 19und l.So 
the loop will be executed seven times. 
Conditional DO loops are also pro- 
vided; 

DOWHILE(J<SIN(ANGLE));or 
DOUNTIL(X>50.2); 

The difference is that with DO WHILE, 
the test is made at the top of the loop, and 
with DO UNTIL, the test is made at the 
bottom, so DO UNTIL always executes 
the body of its loop at least once. The var- 
ious kinds of DO loops can be used in one 
control statement (connected by an 
implied logical AND), and here lies a 
source of confusion, not only for the pro- 
grammer but sometimes for the compiler 
as well. For example, a valid complicated 
DO loop could be: 

DOI=4,5,7,-2,ABS(X + Y),40TO 
50BY3WHILE(J>l*5 + 2) 
UNTIL(!<X*Y-30); 

Now quick, what is the terminating 
condition of this loop? Such things may be 
useful in certain cases, but they probably 
cause more problems debugging than they 
could possibly be worth . It is also possible 
to place DO loop specifications into I/O 
statements, similar to FORTRAN, such 
as: 

GETUST((VALUES(l)DOI=lTO 
NUMBER_OFJTEMS)) ; 




DECLARE PI FLOAT DECIMAL(6); 
DECLARE BIG FLOAT BINARY(31); 

DECLARE RATE FIXED BIN (7, 2); 



{Floating point with 6 significant digits) 
{BIG will be a 31 bit number stored 

internally as a binary number} 
{BIN is a PL/I abbreviation for binary 

RATE is stored as XXXXX.XX where the 

point is a binary point not a decimal 

point) 



Figure 2. 
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A program to print; out Fibonacci numbers in PL/I 

PR0G1: PROCEDURE OPTIONS ( MAIN ) ; 

/* THIS PROGRAM WILL READ A USERS 'S INPUT AND PRINT OUT THE 

FIBONACCI NUMBERS FROM 1 TO UP LIMIT. 
*/ "" 

DECLARE UP_LIMIT FIXED DECIMAL (4,0), 

I FIXED BINARY(15), 

FOUT FIXED BINARY(31); 

/* FOUT IS ADDED JUST TO ILLUSTRATE AUTOMATIC CONVERSION 

OF VALUES IN PL/I, 
*/ 

DECLARE FIBON ENTRY RETURNS (FIXED DEC(9,0)); 

/* THE ABOVE STATEMENT INFORMS THE COMPILER THAT FIBON IS THE 
NAME OF AN ENTRY POINT TO A FUNCTION THAT RETURNS A VALUE OF 
TYPE FIXED DECIMAL(9,0) 

*/ 

PUT LIST ("ENTER A NUMBER, TYPE TO STOP"); 
GET LIST (UPJLIMIT); 
DO WHILE(UP LIMIT > 0); 

DO 1=1 TO UP_LIMIT; /* CONVERSION OF UP_LIMIT TO BINARY */ 
FOUT=FIBON(I); /* CONVERSION OF RESULT TO FIXED BINARY */ 
PUT LIST(FOUT); /* CONVERSION OF BINARY TO ASCII CHAR'S */ 
END; 

PUT LIST ("ENTER A NUMBER, TYPE TO STOP"); 
GET LIST (UP_LIMIT); 
END; 
FIBON: PROCEDURE(NUM) RECURSIVE; RETURNS(FIXED DECIMAL (9,0)); 
DECLARE NUM FIXED BINARY(15); 

IF NUM=1 | NUM=0 THEN /* THE | IS LOGICAL OR */ 

RETURN(l); 
ELSE 
RETURN(FIB0N(NUM-l)+FIB0N(NUM-2)); 
END FIBON; 
END PR0G1; 



Listing 1. 
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which is called an implied DO and is the 
same in execution as: 

DO 1 = 1 TONUMBER_OF_ITEM5; 

GET LIST (VALUES(I)); 
END; 

which will read in NUMBER_OFJTEMS 

numbers from inpul into the array 
VALUES. 

Subroutines and functions 

PL/I provides subroutines and functions 
like many other languages. A subroutine 
is declared as follows: 

routine_name: PROCEDURE; or 
rourine_name:PROCEDURE(argJist); 

If the subroutine is recursive, the key 
word RECURSIVE must appear before the 
semicolon. Subroutines and functions are 
terminated by an end statement with a 
name matching the name of the 
subroutine: 

END routine_name; 

If the subroutine takes arguments, they 
must be declared somewhere inside the 
body of the subroutine. In PL/1, argu- 
ments are always passed as call by refer- 
ence, (VAR in Pascal). If the argument in a 
CALL statement is a literal value, (he com- 
piler will create an internal dummy argu- 
ment and pass the address of that to the 
subroutine. 

One of the facilities of PL/I, the lack of 
which is often bemoaned in Pascal, is the 
ability to pass arrays and character strings 
without regard to their size. Suppose we 
want to pass a two-dimensional array to 
the subroutine SUB! . We would say in 
our calling routine: 

CALL SUB1 (TOTALS); 

assuming TOTALS is the name of an array. 
In the declaration of SUB! we would 
write, for example, the following code: 



SUBl:PROCEDURE(TEMP); 
DECLARE TEMP (V) FIXED 
DECIMAL (6,2); 

ENDSUB1; 

The asterisks in the declaration of TEMP 
signify dimensions to be filled in at each 
run-time execution of this subroutine. 

PL/I provides the built-in function 
DIM(X,n) , which returns the number of 
elements in the «th dimension of the array 
X. HBOUND(X,n) and LBOUND(X,n) , 
which return the high and low bounds of 
the /i in dimension of array X. 

Functions are distinguished from sub- 
routines by the key word RETURNS in 
their heading definition. The key word 
RETURNS specifies what the type of the 
returned value will be. Values to be 
returned are sent through the RETURN 
statement inside the function body. If the 
value computed in the RETURN statement 
is not of the type specified in the 
RETURNS attribute, the value will be con- 
verted to the appropriate type if possible. 
This is another potential for bugs. 

An unusual feature of PL/I that sets it 
off from other mainframe languages is the 
ability for the programmer to catch and 
process interrupts. Most mainframe sys- 
tems so isolate the user from the computer 
that such a facility in PL/I is noteworthy. 
This feature in PL/I is referred to as a 
condition signal. It is a sort of asyn- 
chronous, nonlocal subroutine call. It is 
asynchronous because the programmer is 
not usually able to predict when the inter- 
rupt will occur and nonlocal because the 
statements executed in response to the 
interrupt need not be accessible from the 
currently executing block according to the 
scoping rules of PL/I . 

These two characteristics can cause no 
end of trouble for the debugger. The pro- 
grammer informs the compiler that he or 
she wishes to process error conditions in 
the program by the use of an ON state- 
ment. One of the most useful is the condi- 
tion to check for end-of-file on input: 

ON ENDFILE(SYSIN) < statements >; 

where SYSIN is the name of the standard 
input file. Any file name may appear in its 
place and. in fact, multiple ON ENDFILE 



NEW FEATURES 

(Free update for our early customers!) 
► Edit & Load multiple memory 

resident files. 
» Complete 8087 assembler 

mnemonics. 
» High level 8087 support. 

Full range transcendentals 

{tan, sin, cos, arctan, 

logs and exponentials) 

Data type conversion and 

I/O formatting. 

• High level interrupt support. 
Execute Forth words from with- 
in machine code primitives. 

• 80186 Assembler extensions for 
Tandy 2000, etc. 

• Video/Graphics interface for 
Data General Desktop Model 10 




FORTH 



• Fully Optimized & Tested for: 
IBM-PC IBM-XT IBM-JR 
COMPAQ EAGLE-PC-2 
TANDY 2000 CORONA 
LEADING EDGE 

(Identical version runs on almost all 
MSDOS compatibles!) 

• Graphics & Text 
(including windowed scrolling) 

• Music - foreground and 
background 

includes multi-tasking example 

• Includes Forth-79 and Forth-83 

• File and/or Screen interfaces 

• Segment Management Support 
■ Full megabyte - programs or 

data 

• Complete Assembler 
(interactive, easy to use & learn) 

• Compare 

BYTE Sieve Benchmark jan83 

HS/FORTH 47 sec BASIC 2000 sec 
w/AUTO-OPT 9 sec Assembler 5 sec 
other Forths (mostly 64k) 70-140 sec 
FASTEST FORTH SYSTEM 

AVAILABLE. 
TWICE AS FAST AS OTHER 
FULL MEGABYTE FORTHS! 

|TEN TIMES FASTER WHEN USING AUTO-OPT!) 

HS/FORTH, complete system only: S250. 

HH Visa Mastercard £$ 

Add S10. shipping and handling 

HARVARD 
SOFTWORKS 

PO BOX 69 

SPRINGBORO, OH 45066 

(513) 748-0390 
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CO-PROCESSING 



The most cost effective way for Z80 
system owners to obtain 16/32 bit 
processing power and software 
compatibility is via the HSC CO-16 
Attached Resource Processor. 

CO-16 is compatible with any Z80 
system running CPM 2.2 or CPM 3. 
A few examples include: 

• KAYPRO2/4/10»TRS2/3/12/16 

• AfvlPRO LITTLE BOARD 

• HEATH 89 • SUPERBRAIN 

• XEROX 820 • TELEVIDEO 802/803 

• MORROW • EPSON QX-10 

• LOBO • OSBORNE 1 /EXEC 

• CROMEMCO • Plus many more 



CO-16 



Every CO-16 is delivered with 

• 16/32 bit micro processor • 16 bit 
Operating System • 256 Kilo RAM 

• Z80 interface • 16 bit RAM disk 
driver • CPM80 2.2 RAM disk driver 

• CPM 2.2 or CPM 3 compatibility 
» sources with tools • hardware 
diagrams • board level or case with 
power supply. . 



CO-1686 



The only Z80 16 bit co-processor 
includes ■ INTEL 8086 • 6Mhz no 
wait states • MSDOS2.11 • IBM 
BIOS emulator • Memory expansion 
to768K • 8087 math co-processor 
• 3-channel Real Time Clock • Runs 
many IBM PC applications • Shares 
hard disk space with CPM80 • PC 
diskette compatil ibility on many 
systems • CPM86 • Concurrent 
CPM is coming. 



CO-1668 



The only Z80 16/32 bit co-processor 
includes • MOTOROLA 68000 
microprocessor • 6 Mhz no wait 
states • CPM68K • Full "C" com- 
piler with UNIX V7 library and floats 

• Memory expansion to 1 .25 million 
bytes • NS16081 math co-processor 

• Real Time Clock • Complete soft- 
ware development environment 

• 100% file compatible with CPM80 

• OS9/68 UNIX look alike coming 
in February. 



Dealer, Distributor and OEM's invited 



Hallock Systems Company 
267 North Main Street 
Herkimer, N.Y. 13350 
(315) 866-7125 



Inc. 
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statements may appear, one for each file 
being processed in the program. 

After execution of this statement, 
whenever an end-of-file condition is 
raised on the specified file anywhere in 
the currently executing program, control 
will pass to the statements associated with 
ON ENDFILE and execution will continue 
there. When the statements have all been 
executed, control will return to the point 
where it was interrupted and continue 
there if possible. The usual practice is to 
have ON ENDFILE set some variable flag: 

ONENDFILE(SYSIN) 

END_OF^FILE = ; 
END_OF_FILE=l; 
GET LIST(X); 
DOWHILE(END_OF_F!LE); 



<d 



<ithX> 
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o something wi 

GET LIST- 
EN D; 

Thus the programmer is relieved of 
checking for end-of-file explicitly. 

PL/I also has many ON conditions. 
such as ENDPAGE for end of a printed 
page, FIXEDOVERFLOW, ZERODIVIDE, 
SUBSCRIPTRANGE , and on and on. The 
programmer is even able to create his or 
her own conditions: 

ONMYCONDITION < statements >; 

and later in the program the programmer 
can write something like: 

IFX>YTHEN SIGNAL 
MYCONDITION; 

which will then act just as if an interrupt 
for MYCONDITION had been raised. 

PL/I precompiler 

Programmers familiar with C and its pre- 
processor appreciate the power and use- 
fulness of such a facility. PL/I has a pre- 
compiler which is more powerful than 
C's. It implements many of the major fea- 
tures of the language itself. 

li is possible to write entire programs in 
the precompiler. Precompiler statements 
arc preceded by a percent sign (%). With 
%DECLARE we can declare precompiler 
variables and then perform various com- 
putations on them using arithmetic oper- 
ators. For precompiler flow control PL/I 
has %DO and %GO TO. %IF %THEN 
%ELSE. and even precompiler 
functions: 

routine_name:%PROCEDURE; 

that can be invoked by a compile time 
function reference. In fact, the pre- 
compiler has to do almost as much work 
as the actual compiler does. 
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Everything to everybody 

PL/I was chosen by IBM to be the pro- 
gramming language for its System 
360/370 computers, intended to remove 
the need for programmers to use FOR- 
TRAN, COBOL, ALGOL, and Assem- 
bler. As we know, these languages are still 
in use. It seems possible that the design of 
Pascal with its relative paucity of func- 
tions was in part influenced by the percep- 
tion that PL/I was too complicated and a 
new language should be more elegant, 
verifiable, and simpler to implement. 

Now we are seeing the backlash against 
Pascal with the advent of Ada, which is 
certainly a very powerful language. But 
Ada is seen by some as another PL/I, a 
monstrous language by committee with 
thousands of features that can be misused, 
conversions of data types, and over- 
loading of operators. 

As a sideline for anyone who's inter- 
ested, on the COMPUTER LANGUAGE 
Bulletin Board Service and on this maga- 
zine's account on CompuServe I've 
uploaded a file called PLI.CAL, which is 
a good example of many of the PL/I cod- 
ing techniques discussed in this article. 
The program will print a calendar for any 
month after the year 1800 up to the year 
9999. 

PL/I is a powerful, useful language that 
still has many proponents. In a sense it 
can be said to be the most popular lan- 
guage in the world since IBM's operating 
systems are written in a subset of PL/I. 
People still write large PL/I programs 
because the language provides the power 
many programmers desire. H 
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k, — ajk for your IBM/PC 

The new 
standard for 
convenience. 




Now. the mbp COBOL Compiler offers 
unrivaled convenience to go with its 
unmatched performance. 

Here are the convenience 
features you've wished for: 

1) an enhanced Screen 
Management System with pro- 
gram-controlled video attributes 
and color; 2) support for PATH & 
sub-directories; 3) DOS command 
execution from within a COBOL 
program; 4) permanent' DEFAULT 
modification. 

The new mbp Compiler has them 
all! And they're exclusives: you get them on/y with mbp. 

Plus, it's 4 times faster. 

Because the mbp COBOL Compiler generates native machine 
language object code, it executes programs at least i times faster 

(see chart). Now we've made 



mbp COBOLJ1000 

Please send complete mbp COBOL information 
to: 



GIBSON MIX Benchmark Results 

Calculated S-Profile 
(Representative COBOL statement mix) 

Execution time ratio 



mbp' 
COBOL 

1.00 



Level II- 
COBOL 

4.08 



R-M' Microsoft' 
COBOL COBOL 

5.98 6.18 
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that performance even 
more convenient to use. 

The complete COBOL. 

An Interactive Sym- 
bolic Debug Package 
included standard; Multi- 
keyed ISAM structure; SORT 
& CHAIN; GSA certification 



to ANSI '74 Level II; IBM/PC-AT and TI Professional compatibility; 
with mbp, you get it all. Optional: Novell NetWare interface, 

mbp COBOL: the choice of professionals. 

It's no surprise more and more companies like Bechtel, Bank 
of America, Chase, Citicorp, Connecticut Mutual, Hughes Aircraft, 
McDonnell-Douglass, and Price -Waterhouse choose mbp COBOL. 

Make it your choice, too. just send the coupon, or call, for 
complete information. Today. 
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mbp Software & Systems Technology, Inc 

7700 Edgewater Drive, Suite 360 
Oakland, CA 94621 

Phone 415/632-1555 
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SERVICES 

■ Pregrammer't Reteml Lul 

• Compare Profeti 

• HelpfindiPuiliiltet 

Evil Jilion Lite ra lure frte 



Dei ler'l Inquire 
Nevtletler 
Ruth Onler 

Over 700 products 



BULLETIN BOARD ■ 7 PKki 7 AM 61 T-S26-4086 



ARTIFICIAL INTELLIGENCE 



EXSYS - Expert System building 
tool. Full RAM, Probability. Why, 
Intriguing, serious. PCDOS S275 

GC LISP - "COMMON LISP", Help, 
tutorial, co-routines, compiled 
functions, thorough. PCDOS Call 

INSIGHT 1 
decent 



Free Literature - Compare Products 

Evaluate products Compare comoeiilors Learn aboul new alternates Ore free cjil 
Brings information on gust about any programming need Ask lor any "Pickit" or 
Addon Packet DADA, Modula □ At □ BASIC 0"C □COSOL □ Editors 
LJFORTH QfORTRAN CPASCAL QUNlXPCorDDtbuggers. Linkers. etc 



RECENT DISCOVERIES 



SMALLTALK for PCDOS - -Methods" 
has objects, windows . browser, 
inspector. PCDOS S239 



Expert Sys. Dev't, 

PCDOS S95 
M Prolog - full, rich, separate 
work spaces. MSDOS $725 

PROLOG-86 - Learn fast, Stan- 
dard, tutorials, samples of Natural 
Language, Exp. Sys. MSDOS $125 

TLC LISP - '■LISP-machine"-l«ke, 
all RAM, classes, turtle graphics 



8087. 



CP'M-86, MSDOS $235 



Expert System fronl-ends for 
PROLOG: APES (S275), ES P 
($895) 

Other solid alternatives include: 
MuLISP-86 ($1 89), WALTZ LISP for 
CPM ($159), MtcroPROLOG (S275) 



EDITORS FOR PROGRAMMING 



BRIEF Programmer's Editor - undo, 
windows, ^configurable, macro 
programs, powerful. PCDOS $195 

VEDIT - well liked, macros, buffers, 
CPM-80-86, MSDOS. PCDOS $119 

EEBE8EB3 

We evaluate, carry every available 
programmers product. Ask. 



C LANGUAGE 



C Terp by Gimbel, full K & R, .OBJ, 
ASM interface, 8087, MSDOS $275 

INSTANT C - Interactive develop- 
ment - Edit, Source Debug, run. 
EdittoRun-3Secs. MSDOS $495 

"INTRODUCING C" - Interactive 
C to learn fast. 500 page tutorial, 
examples, graphics. PCDOS $95 

MEGAMAX C - native Macintosh 
has fast compile, tight code, K&R, 
toolkit, .OBJ, DisASM MAC $275 

mssm 

APPLICATION TOOLKIT by Shaw - 
Complete: ISAM, Screen, Overlay 
mgnt, report gen, Strings, String 
math. Source. CPM, MSDOS $495 

COMMUNICATIONS by Greenleaf 
($159) or Software horizons ($139) 
includes Modem7. interrupts, etc. 
Source. Ask for Greenleaf demo. 

C SHARP Realtime Toolkit - well 
supported, thorough, portable, ob- 
jects, state sys. Source MANY $600 

PRE-C - LINT, full, enhanced. 

all Cs. MSDOS $345 



DEBUGGERS 



PERISCOPE DEBUGGER-load 
after "bombs", symbolic, "Reset box", 
2 Screen, own 16K. PCDOS $279 

SOURCE PROBE by Atron for 
Lattice, MS C, Pascal. Windows 
single step, 2 screen, log file. $395 



FORTRAN LANGUAGE 



DR Fortran-77 - full ANSI 77, 8087, 
overlay, full RAM, big arrays, com- 
plex NUMS., CPM86, MSDOS S249 

MacFORTRAN - full 77, '66 option, 
toolbox, debugger, 128K or 51 2K, 
ASM-out option MAC $375 

Ask about Microsoft, Supersoft, others. 



OTHER LANGUAGES 



ASSEMBLER - ask about FASM-86 
($95), ED/ASM ($100) - both are 
fast, compatible, or MASM 
($125), improvements. 

BetterBASIC all RAM, modules, 
structure. BASICA - like $185 

HS/FORTH - '79 & '83 Standards, full 
RAM. ASM. BIOS, interrupts, graph, 
muiti-task, optimizer MSDOS $250 

MBP COBOL has screen control, strong 
doc."74interm.,fast. MSDOS $680 



SUPPORT PRODUCTS 



BASIC DEVELOPMENT SYSTEM - 
(BDS) for BASICA; Adds Renum, 
crossref. compress. PCDOS S1 15 

CODESMITH - visual, interactive 

debugger. Symbolize, modify 

code $129 

FASTER C - Lattice users eliminate 
Link step. Normal 27 seconds. Faster 
C in 13 sec. MSDOS $95 

PLINK-86 for Overlays, most lang., 
segment control. MSDOS $325 



C" LANGUAGE 



OUR 
PRICE 

MSDOS C86-808 7. reliable tall 

Instant C- Inter .last. lull 495 

Lattice C • the standard call 

Microsoft C 3 - new 279 

Williams, debugger, fast call 

CPM80 EcoPlus C - taster. SLH 275 
BDS C- solid value 125 

MACINTOSH: Hippo II 375 

Megarnax • optimizer, full 275 
Consulair "s MAC C 275 

Compare, evaluate, consider other Cs 



75 
279 

115 
186 
419 



EDITORS Programming | | LANGUAGE LIBRARIES 



OUR 

RONS ON PRICE 

BRIEF - Intuilive. flexible PCDOS 1 95 

C Screen with source 86 80 75 

Epsilon - like EMACS PCDOS 195 

FINAL WORD-lor manuals 86 80 215 

PMATE-powerlul 8086 185 

VEDIT-full. liked 86 80 119 

XTC- multitasking PCDOS 95 



RONS ON 
Active Trace-deoug 86 80 

BASCQM-86-MiCroSott 8086 
BASIC Dev't System PCDOS 
BetterBASIC -640K PC00S 

CB-86-DRI CPM86 

Prof BASIC Compiler PC00S 89 
CADSAM-Full Btree. source MSDOS 150 
SCREEN SCULPTOR PCDOS H5 
Ask about ISAM, orjier addons br BASIC 

B333B3 

ALL PRODUCTS ■ We carry 700 products 
for MSDOS CPM 86 CPM 80. Mac- 
intosh and key products lor other 
micros 
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Dig Res-decent 
Macintosh COBOL-Full 
MBP-Lev. II, native. screen 
Micro Focus Prol.-full 
Microsott-Levll.no royal 
Ryan McFarland-portable 



MSDOS 500 
MAC 1850 
MSDOS 885 
PCDOS call 
MSDOS 500 
MSDOS 695 



GRAPHICS Grapht-source in C 
GRAPHMATIC-3D FIN. PAS 
HALO-fast, full-all lang 

FILE MGNT BTneve-all lang 
Cinder --source no royal 
CTree-source, no royal 
dBC ISAM by Lattice 
dBVlSTVNerworK' Structure 
PHACT-up under UNIX, addons 

OTHER COtil by Essential 
Greenleaf -200 - 
CSharp- Real-Time 
PORTABLE C to PC. Mac, II 
SOFT Horizons • Bkws I 

SCREEN CORSES by Lar.ice 
CView - input, validate 
MetaWINDOW- icons, clip 
PANEL- many lang term 
ProScreen - windows, source 
Windows for C 



MS00S 219 

XD0S 125 

^CDOS 139 

MS00S 215 

8680 369 

ALL 369 

8086 229 

MSO0S 465 

MSDOS 225 

MSDOS 129 

MSDOS 159 

MSDOS 600 

Many 125 

=C00S 139 

PGDOS 125 

3C00S 195 

^COOS 139 

MSDOS 249 

PCDOS 115 

MSDOS 175 



Call for a catalog, literature, and solid value 

800-421-8006 

THE PROGRAMMER'S SHOP" 

128-L Rockland Street. Hanover. MA 02339 
Visa Mass 800-442-8070 or 617-826-7531 MasterCarc B51 
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PRICE 


MSFORTRAN-86-lmpr 


rfSDOS S 239 


OR Fonran-86 - lull 77 


8086 


249 


PolyfORTRAN-XREF.Xtraci 


PCDOS 
8086 


165 


OTHER PRODUCTS 




Assembler 4 Tools - DRI 


159 


Atron Oenugger for Lattice 


PCDOS 


395 


cEnghsh - dBase to C 


J1SD0S 


750 


C Helper DIFF, xref, more 


8680 


135 


C00ESMITH-86- debug 


TOS 


139 


MacASM-lu! fast, tools 


MAC 


115 


MBP Cobol-86- fast 


8086 


m 


Modula 2 lor MAC 


>CD0S 


90 


Micro SubMATH-FORTRAN lull 


8680 


■;vi 


Microsoft MASM-86 


WS00S 


126 


MSD Debugger 


PC00S 


119 


Multilink - Multitasking 


PCDOS 


2fab 


PC FORTH --well liked 


vISDUS 


219 


PHX-86 Debugger 


ffiDUS 


169 


PL 1-86 


81)86 


495 


PolyliSranan - thorough 


vISDOS 


95 


PolyMAKE 


PCDOS 


95 


PROFILER Dy 0WB - demote 


vBDOS 


109 


Prolog-86-Leam. Experiment 


V1SD0S 


125 


SVMDdebugger-symrjols 


PCDOS 


119 


TRACE86 debugger ASM 


MSDUS 


IIS 



Noie All prices suDiect 10 change without notice 
Mention this ad Some prices are specials 
Ask about CDD and POt. All formats available 
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ast month we 
turned our atten- 
tion to the 
Macintosh and some of the programs 
made available recently by the Public 
Domain Exchange. As promised, we will 
continue this month with a few more of 
the Mac's better public domain releases. 

Let's start with a short look at a disk 
that, while not especially useful in terms 
of utility programs or enhancements (with 
one exception), sure is a lot of fun! Mac 
Disk 9 is labeled "Voice and Sound Syn- 
thesizer" and consists of eight programs 
of that genre. 

The one that immediately captures the 
attention is a file called Talking Head, 
which draws a caricature of a face on the 
screen. Pushing the mouse's button causes 
the mouth on the face to move a little, and 
the speech synthesis capabilities of the 
Mac are demonstrated by a few well cho- 
sen sayings. Examples arc Hamlet's "To 
be or not to be" soliloquy and Abraham 
Lincoln's "Four score and seven years 
ago" address. The synthesis is very well 
done, and there is enough of a variety of 
sayings that a good demonstration of the 
Mac's capabilities along this line can be 
made. 

Speech Lab allows the user to enter text 
that is translated and spoken by the Mac- 
intosh. Straight text entry is not very 
effective, and a phenom-based approach 
works much better. The approach to 
entering text for this program reminded 
me very much of the Votrax synthesis 
device. With a little practice, any saying 
can be entered and enunciated by the Mac. 

A series of files are used to demonstrate 
the four-tone synthesis capabilities of the 
Mac. Sample tunes include the inevitable 
"Star Wars Theme" (sorry, but I'll stick 
to the orchestrated version) and a demon- 
stration on building a sound like a gun 
shot. Finally, a square wave music 
demonstration is available. 

A very useful utility is a program called 
Set File, which displays the files on the 
disk with their attributes, including date, 
locked, invisible, bundle, system, type, 
creator, and more. These can be changed 



at will by the user. For finding invisible 
files or making files invisible, this is very 
useful. 
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ac Disk 10 is an 

, interesting vol- 

:::::::::::::::::::■ w lumc. it contains 

five folders. Read Me First has informa- 
tion on copying the disk and putting MS- 
BASIC and Finder on it. The other four 
folders are Applications, Games, Demon- 
strations, and Math Font. The Applica- 
tions folder consists of the communica- 
tions program KERMIT, with a 
well-written documentation file printable 
with MacWrite. 

KERMIT, for those unaware of it, is a 
communications system for mini-micro- 
mainframe systems to allow a reasonable 
level of compatibility between ihcm. It 
defines several standards for protocols 
and is an attempt to create a more univer- 
sal environment for communications. 
(KERMIT will be the subject of a future 
column, so will not be discussed in detail 
here.) 

Rolodex Database is exactly what its 
name implies. It is a Macintosh Rolodex. 
(I thought that was a tradename, but no 
acknowledgment of such is given.) It has 
some well-written, brief instructions on 
using the system and allows "cards" to be 
added to a master file. Printouts are avail- 
able easily, and files can be found on any 
word or phrase that occurs anywhere on 
the card. This seems ideal for many dif- 
ferent purposes. A quick phone directory, 
business card list, and library application 
come easily to mind. Although not blind- 
ing!)' fast (what is on the Mac?), it runs at 
an acceptable rate. 

Hands On is listed as a "binary tree 
playground." Perhaps not for everyone, 
this is a program that allows binary trees 
to be built up relatively easily and then 
manipulated. Binary trees are shaped like 
trees, with branches, roots, leaves, and 
junctions referred to as nodes in binary 
tree parlance. 

Binary trees have long been the subject 
of academic curiosity. Virtually every 
programming course at a university or 
college includes some sort of binary tree 
application. This program allows them to 
he taken on a more friendly level. Docu- 
mentation is good, and the imple- 
mentation is very good. Parsing is by- 



infix, prefix, or postfix. (For more on 
binary trees, see this issue's Cross- 
Thoughts column.) 

The Games folder should have been 
called Game, as only one item is in it. 
That is a game called [ago. which closely 
resembles GO. It is a strategic capture 
game where an opponent 's piece has to be 
surrounded. There are three difficulty 
levels (novice, hacker, and expert), with 
three choices of board sizes (8x8, 10x10, 
and 12x12). The graphics arc extremely 
well done, and the game is quite absorb- 
ing. It can be played against the computer 
or against another human. The computer 
plays a very good game! 

A cute feature of Iago borrowed from a 
game first seen on the Apple is a "Hide 
the boss is coming" menu choice. When 
this is activated, the screen is saved and 
cleared, and a blank spreadsheet form 
appears. The instructions wisely caution 
you to have an intense look of concen- 
tration on your face when this is dis- 
played. Naturally, the game can be 
recalled easily. 

Speaking of instructions, Iago has a 
fairly good set as the rules are quite sim- 
ple. Games can be played back at varying 
speeds, and a number of other options arc 
available. All in all, this was a very inter- 
esting game and will probably continue to 
occupy a great many idle hours (and some 
that are not supposed to be idle). 

The Demonstrations folder has two 
files in it. 3-D Demo draws a Macintosh 
on the screen and rotates it. UI Demo 
illustrates the different user interfaces 
available on the Mac. Although the rotat- 
ing Mac shows three-dimensional capabil- 
ities, the folder as a whole wasn't quite as 
exciting as I'd hoped. This folder also has 
a BASIC 3-D graphics program and a 
BASIC pattern and cursor editor. 

Finally, and of some interest to sci- 
entists, engineers, and mathematicians, is 
a set of Math Fonts for MacWrite. These 
modify the 10- and 20-point Seattle fonts. 
Most foreign language characters have 
been reassigned to mathematical symbols, 
but the Greek character set remains intact. 
The set is rather comprehensive and 
should be of great help to most technical 
report writers. Included characters arc 
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(randomly picked): Planck's constant, 
integral sign, several braces, summation 
sign, set theory symbols, proportional 
sign, congruent, logic symbols, and many 
more. A documentation file lists the 
choices and three keyboards available. 
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ac Disk 1 1 is 
full ofcommu- 
!":!!"■ W Bmcationsand 
utility programs. They all require MS- 
BASIC to run. Two communications pro- 
grams vie for attention. 

Red Ryder (I don't know where the 
name comes from) is a terminal program 
that accepts mouse commands. Documen- 
tation is included in a text file but be 



warned ... it is long! Two versions of 
Red Ryder arc included on the disk. One 
is an executable version, while the second 
is an ASCII text version that can be 
transmitted. 

The other communications program is 
MacAck. which also supports the mouse. 
It emulates a standard terminal and has 
good online help menus. 

A folder called Catalogger allows a 
catalog of Mac disks to be built up. Four 
programs compose the folder. One is a 
documentation file, while the others allow 
the catalog to be built, listed, and 
updated. Catalogger worked well in prac- 
tice and was easy to use. Searching for 
titles is possible with a dump to either 
the screen or printer. 



GOOD NEWS! 




CORPORATION 



$47 W* Virginia St. 
Milwaukee, Wl BS204 
(4141 276-2937 



c 

for the 

6809 

M&S NEVER 

BETTER! 

INTR0L-C/6809,Version1.5 

Introl's highly acclaimed 6809 C 
compilers and cross-compilers are now 
more powerful than ever! 

We've incorporated a totally new 6809 
Relocating Assembler, Linker and Loader. 
Initializer support has been added, leaving 
only bitfield-type structure members and 
doubles lacking from a 100% full K&R 
mplementation. The Runtime Library has 
been expanded and the Library Manager is 
even more versatile and convenient to use. 
Best of all, compiled code is just as 
compact and fast-executing as ever - and 
even a bit more so! A compatible macro 
assembler, as well as source for the full 
Runtime Library, are available as extra-cost 
options. 

Resident compilers are available under 
Uniflex, Flex and OS9. 
Cross-compilers are available for PDP- 
11/UNIX and IBM PC/PC DOS hosts 

Trademarks: 

Introl-C. Introl Corporation 

Flex and Uniflex, Technical Systems Consultants 

OS9. Microware Systems 

PDP-11. Digital Equipment Corp. 

UNIX, Bell Laboratories 

IBM PC. International Business Machines 

For further information, please call or write. 




An MS-BASIC folder contains a num- 
ber of programs of varying utility. Files 
on Ext Drive allow a catalog of the disk 
in the Mac's external drive to be obtained. 
Get Info allows a user to do several things 
to a file's attributes, including hide it 
(make it invisible), change file types, or 
use a special scries of Toolbox calls. A 
help file is incorporated. 

Split File will bisect MS-BASIC pro- 
gram listings so that they can be read and 
printed out with MacWrite. Pattern Help 
determines the code for background fill . 
Similarly. Pattern Editor allows (you 
guessed it) the background pattern to be 
edited. MacCursor allows a custom cur- 
sor to be designed. Tamler Menus is an 
example of pull-down menu procedures 
using MS-BASIC. A version without the 
REM statements is included, but the REM 
statements have all the documentation in 
them. 

Finally, Type allows a file to be dumped 
to the screen, while Print Bas Files and 
Print Text will send the files to a printer. 

isk 14 con- 
; a pot- 
Ipourriof 
material. A MacPaint folder has three 
items in it. Explosion. The First Night, 
and Ground Hog Day 1984 have to be 
seen, not described. 

A list of fixes for MS-BASIC version 
1.01 is included in a MacWrite document. 
These were downloaded from a Com- 
puServe user, who made a list of the 
updates, fixes, and additions to MS- 
BASIC. This file may be of some use to 
those who purchased the older version and 
also points out some of the major points 
that have irritated BASIC users. 

Version 1 .87 of MacTEP is available. 
This program was mentioned last month, 
and this is an expanded, corrected ver- 
sion. A MacWrite document file is also 
included. Enhancements include printer 
on/off toggling. XON/XOFF protocol, 
and others. A subsidiary program. Run- 
ner, is included. 

MacMon is a program that provides a 
subset of Apple Monitor commands. A 
documentation file is included and is 
fairly well written. Available commands 
are displaying memory, altering memory, 
machine code disassembly listing, and 
memory moves. Double precision hexa- 
decimal arithmetic is available. 

An MS-BASIC folder contains several 
diverse items. Briefly, BigPic will enlarge 
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Add EDITING 
to your 

Software 

with 

CSE Run-Time" 

Your program can include all or a portion 
of the C Screen Editor (CSE). 

CSE includes all of the basics of full 
screen editing plus source in C for only 
$75. For only $100 more get CSE Run- 
Time to cover the first 50 copies that you 
distribute. 

Use capabilities like Full cursor control, 
block move, insert, search/replace or 
others. Portability is high for OSes, ter- 
minals, and source code. 
Call for the "CSE Technical Description" 
and for licensing terms and restrictions. 

Full Refund if 

not satisfied in 
first 30 days. 
Call 800-821-2492 



-Solution 
.Systems 

15S- Woshington Street 
Norwell. Mfl 02061 
617-659-1571 



PROFESSIONAL PROGRAMMER'S BULLETIN: 



Be Productive, Be 




The Programmer's Editor 



BRIEF'S power and flexibility provide 
dramatic increases in programming 
productivity. BRIEF'S economically designed 
human interface becomes a natural extension 
of your mind, allowing you to eliminate 
tedium and concentrate on creativity. 



AVAILABLE FOR PC-DOS, IBM-AT, 
AND COMPATIBLE SYSTEMS 

ONLY $195. 



• WINDOWS 

• Full UNDO (N Times) 

• Compile within 
BRIEF 

• Keystroke Macros 

• Exit to DOS inside 
BRIEF 

• Programmable Macro 
Language 

Soiut pi Sysir ma is a jrajjegwrt rt solution System 



Multiple files, 
unlimited size 

"Regular 
Expression" search 

Reconfigure 
keyboard 

Language sensitive 
user controllable 
features (such as 
Auto-Indent for C) 



CALL TOLL FREE 
800-821-2492 

for "Technical Description" or to order 

-Solution 
^Systems 

335-L Washington St.. Morwell. MA 02061 
617-559-1571 
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c 

Helpef 

c/r^T-AID FOP C 
PROGRAMS , 



DIFF and CMP - for "intelligent" file comparisons. 

XREF - cross references variables by function and line. 
C Flow Chart- shows what functions call each other, 
C Beautif ier - make source more regular and readable. 
GREP - search for sophisticated patterns in text. 

There are several other utilities that help with converting 
from one C compiler to another and with printing 
programs. 

C Helper is written in portable C and includes both full 
source code and executable files v 

Solution 



forS135forMS-DOS,IBMAT 
CPM-80 or CPM-86. Use 
VISA, Master Card or COD. 

Call: 800-821-2492 



Systems 

335 Washington Street 

Norwell.MAu206l 

617-659-1571 
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PROLOG-86™ 

Become Familiar in One Evening 

Thorough tutorials are designed to help learn the PROLOG 
language quickly. The interactive PROLOG-86 Interpreter gives 
immediate feedback. In a few hours you will begin to feei comfort- 
able with it. In a few days you are likely to know enough to modify 
some of the more sophisticated sample programs. 

Sample Programs are Included like: 

■ an EXPERT SYSTEM 

■ a NATURAL LANGUAGE INTERFACE 

(it generates a dBASE fl "DISPLAY" command} 

■ a GAME (it takes less than 1 page of PROLOG-86) 

PROTOTYPE Ideas and Applications QUICKLY 

1 or 2 pages of PROLOG is often equivalent to 10 or 15 pages in 
"C" or PASCAL. It is a different way of thinking. 

Describe the FACTS and RULES without concern for what the 
computer will have to do. Maybe you will rewrite in another 
programming language when you are done. 
Programming Experience is not required but a logical mind is 
PROLOG-86 supports the de facto STANDARD established in 
"Programming in Prolog." 

AVAILABILITY: PROLOG-86 runs on MSDOS, PCDOS, 
IBM AT or CPM-86 machines. We provide most formats. The price 
of PROLOG-86 is only S125. 



Fulf Refund if not 
satisfied during 

first 30 days. 
800-821-2492 



-Solution 
<Systems™ 

335-L UUoshington Street 
Norwell. MA 02061 

617-659-1571 
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a MacPaint document to four times its 
original size and allows the picture lo be 
saved in four sections. These can be 
printed separately and then pasted 
together. FontList provides a list of all the 
fonts in the system and their correspond- 
ing font numbers. When auxiliary fonts 
such as the previously mentioned math 
font are used, this provides a handy refer- 
ence list. 

XRef provides a BASIC cross- 
referencing facility for variables. Com- 
pare does a straight comparison of two 
text files and lists their differences. Dsk- 
Zap is an interesting program that allows 
the Macintosh internal disk drive to be 



read, edited, and written in 5 12-byte 
blocks. This program should be used by 
experienced programmers, as the disk can 
easily be trashed. 



■'■■■■■■■»■««■»■■••■■ 

*■■■•■■ ■•••!!««■■»«■■■ 
■ -*■-»■ *■■«*■■ mm 



T 

i < 



o round off this 
month's summary 
■ of Macintosh 
material, Mac Disk 17 contains several 
items of interest. 

Those tired of waiting for the Mac- 
intosh's disk copying routine will wel- 
come the Four Pass Copier program. As 
its name implies, this program allows a 
disk to be copied in only four passes 
(assuming a single drive, of course!). 
Those who tend to make frequent backups 



Lattice makes the pieces fit . 




Puzzled by complex programming problems? 
Lattice has the tools to help you "get it together!" 

Lattice provides the software tools and utilities you need to design, 
create, modify, analyze, and maintain your C programs and your 
documentation. 

Lattice offers a wide range of C Compilers, C Cross-Compilers, C 
Function Libraries, and C Utility Programs to save you time and 
effort and help manage your complex software systems. 

Lattice products are used by more than 26, 000 software developers 
worldwide — including Lattice, Inc. as they develop their own new 
products, updates, and enhancements. 

Call Lattice today. We have the programming tools you've been 
looking for to help you complete your projects! 

Ask about our Trade Up to Lattice C Policy. 



LATTICE 



P.O. Box 3072 
Glen Ellyn. JL 60138 
312/858-7950 
TWX 9 10-29 1-21 90 



International Sales Offices 

Belgium: Softshop. Phone: (3?| 53-661875. 
England: Round Hills. Phone: |0672| 54675, 
Japan: Lifeboat Japan. Phone: (03| 293 231 I. 



and are tired of the inevitable insert mes- 
sages should try this one, 

Another enhanced BASIC program 
lister also appears on this disk. This adds 
a title, the date, and allows some ver- 
satility in listing. Boldfacing can be 
included, if desired, and separate state- 
ments can be placed on separate lines. 

Another program of a similar sort is 
List, which is an MS-BASIC program that 
will send any ASCII text file to the Image- 
writer. An automatic indentation of 12 
spaces is set, and the text is automatically 
paginated. The program appears to crash 
if any lines longer than 1 60 characters are 
used, but this isn't really a limitation. 

A MacWritc document called Bulletin 
Boards not surprisingly contains a list of 
some bulletin boards that the Mac can 
access. All the numbers are in the New 
York area. 

The graphics of the Mac arc accessed 
by a few programs. Living Art displays a 
kinetic art demonstration. Exiting took a 
bit of trouble, as the cursor was hidden. I 
ended up moving the mouse everywhere 
until the pull-down menu was triggered. 
Perhaps that is half the fun? 

A collection of different borders for 
incorporation into MacWrite and Mac- 
Paint documents is included in a Borders 
file. The sizes of the borders can be 
changed and rotated at whim. There is a 
good variety of different designs avail- 
able, and they do tend to add that little 
extra touch to most documents. 

Finally, MacPlot is a program designed 
for graphing. It is possible to create auto- 
matically scaled plots from several data 
sets at once. The graphs are well done, 
and the program is easy to use. 

And so much for 

this brief look at 
the Macintosh. 
There is more to come in the future, 
especially as the amount of material avail- 
able in the public domain is undergoing 
exponential growth. All of the mentioned 
disks are available from the Public 
Domain Exchange at 673 Hermitage 
Place, San Jose, Calif. 95134. The cur- 
rent price is S 10 per volume. H 
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PascalPac" Not a Mayan Volcano But 
Packed with Power for Turbo Users. 

(from the people who brought you tidy™ — The Pascal Formatter) 



For the IBM PC, XT, AT. PascalPac'" 

X-REF creates cross reference table. 

X-RAY browses cross reference and 

program simultaneously. 

X-PRNT is a versatile listing program. 

X-Peek browses programs or text files. 

One version of PascalPac supports Microsoft 

and TURBO PASCAL. 

tidy- 
Program formatter makes a PASCAL program easier to 
read, understand and modify. In use for over one year in 
major companies and programming organizations. Available in separate 
versions for Microsoft and TURBO PASCAL. 

"tidy is a lightening- fast Pascal formatter from Major Software." 

"tidy does its job well and quickly." 

"Of the products we've seen, we felt that tidy is the one most 

programmers will prefer." 

PC Tech journal 

PascalPac S195.00; tidy-Turbo $49.00; tidy Microsoft $69.00; Shipping $5.00. 

To order: VISA/MasterCard orders. Call (41S) 941-1924. Or mail check/money order 
to: Major Software, 66 Sylvian Way, Los Altos, CA 94022 
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SuperSoft Programmer Utilities 


When Performance Counts 


Star-Edit and Disk-Edit 


Star-Edit is the professional 


Disk-Edit is the uniquely powerful disk 


programmer's text editor with an 


utility for programmers which gives you 


outstanding list of commands tailored 


access to every bit of information on 


to program development. It can greatly 


your disk. It lets you read disk data in 


simplify all your editing tasks - moving 


both HEX and ASCII, "text edit" any 


and reproducing text or code, viewing 


information on your disk, restructure 


two files simultaneously through 


disk information, and save lost or 


separate windows, moving text or code 


scrambled data. Imagine scrolling 


between different files, searching 


through your disk data, jumping 


forward or backward, and moving to the 


between HEX and ASCII windows, and 


beginning or end of any word, sentence. 


editing information anywhere on your 


paragraph, parentheses, or curly 


disk. For all floppy and hard disk 


brackets. Virtual memory makes Star- 


systems. (PC DOS. MS DOS. CP/M-86, 


Edit ideal for extremely large files; and 


CP/M-80, UNIX, or XENIX): $100 


because it never uses over 1 28K, it is 




well suited for multiple process and 




windowing environments. (PC DOS, 




MS DOS, CP/M-86. CP/M-80, UNIX, 
or XENIX): $225.00 


SuperS ft 


To order call: 800-762-6629 


1713 S. Neil St.. P.O. Box 1628 


In Illinois call: 217-359-2V 1 2 


Champaign, IL 61 820 


or write to SuperSoft - 


telex:270365 



YOU NEED 

A GOOD* 

LIBRARY^ 





POWER PACKS 



COMPLETE SOURCES 
NO ROYALTIES 

COMPREHENSIVE C Power Packs 
include over 1000 functions which 
provide an integrated environment 
for developing your applications ef- 
ficiently. "This is a beautifully doc- 
umented, incredibly comprehensive 
set of C Function Libraries." 

- Dr. Dobb's Journal, July 1984 

USEFUL "...can be used as an ex- 
cellent learning tool for beginning C 
Programmers..." 
- PC User's Group of Colorado, Jan. 1985 

FLEXIBLE Most Compilers and all 
Memory Models supported. 

RECOMMENDED "I have no hesita- 
tion in recommending it to any pro- 
grammer interested in producing 
more applications code, using more 
of the PC capabilities, in much less 

time." — Microsystems, Oct. 1984 

$149 



i PACK 1: Building Blocks I 

DOS, Keyboard, File, 
Printer, Video, Async 

I PACK 2: Database 

B-Tree, Virtual Memory, 
Lists. Variable Records 



$399 



$149 



g PACK 3: Communications 

Smartmodem™, Xon/Xoff, 
X-Modem, Modem-7 

B PACK 4: Building Blocks II $149 
Dates, Textwindows, Menus, 
Data Compression, Graphics 

I PACK 5: Mathematics I S99 

Log, Trig, Random, 
Std Deviation 

■ PACK 6: Utilities I $99 

(EXE files) 
Arc, Diff. Replace, Scan, Wipe 

Master Card/Visa, S7 Shipping. Mass Sales Tax 5% 
ASK FOR FREE DEMO DISKETTE 



novun 

OMfiriun 

inc. 



%" 



SOfTWflM 

toraons 

inc. 
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165 Bedford St., Burlington, MA 01803 
(617)273-4711 
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C Source Code 

RED 

Full Screen Text Editor 

IBM PC, Kaypro, CP/M 80 and CP/M 68K systems. 



' RED is fasti R1:D uses all of 
your terminal's speciiil func- 
tions for best screen response. 
RED handles files as large as 
your disk automatically and 
quickly. 

1 RED is easy to use for writers 
or programmers. RED's com- 
mands are in plain English. 

1 RED comes with complete 

source code in standard C. 
RED has been ported to main- 
frames, minis and micros. 



1 RED comes with a Reference 

Card and a Reference Manual 
that provides everything you 
need to use RED immediately. 

1 RED is unconditionally 
guaranteed . I f for any reason 
you are not satisfied with RED 
sour money will be refunded 
promptly. 

RED: $95 

Manual: S10 



edward k ream 



Call or write today for 
for more information: 
Edward K. Ream 
1850 Summit Avenue 
Madison. Wl 53705 
(608) 231-2952 



To order; 

Lithcr the BUS C compiler or the Altec Cll compiler is required lor CP/M80 
Systems. Diyilal Research C compiler \ 1. 1 is required lor t T M tiKK \ysleins. No 
compiler is required lor U1M or Kaypro systems. 

Specify both liie machine desired tltlM, Kaypro or CP. Mi and r lie disk formal 
described (8 inch CP'M sinele density or evact lype of 5 ; incfi disL). 

Send a cffeclt or money order for S9? (SI05 U.S. for foreign orders). Sorry. I do 
NUT accept phone, credit card, or COD orders. Please do nor send purchase orders 
unless a check is included. Your order will be mailed to you wiihin one ueck. 

IX-aler inquiries Invited. 



TM 



ConIX 

NOW ONLY $79.95! 

If you think you're missing out on innovative software 
developments because nobody is writing for CP/M™-80. take 
a look at us. We've adapted UNIX™ features to CP/M like 
never before, and with the kind of professional, quality- 
controlled product that you deserve. That product is none 
other than the critically acclaimed ConIX Operating System. 

ConIX can provide any 48K+ CP/M-80 or compatible system 
with I/O Redirection and Pipes (uses memory or disk), 
perfected User Areas. Command and Overlay Path Searching, 
Auto Screen Paging. 8Mb Print Buffering, 22 new SysCalls. 
Function Keys, 'Virtual" disk system. Archiver (saves over 
50% disk ) . extensive command language. 300-t- variables. 100+ 
commands, pull-down menu, and much more! Uses as little as 
1/2K RAM! Runs with CP/M for true data and software 
compatibility. Installs easily without any system mods! 

The ConIX package lists at $165 and has been advertised and 
sold internationally to many enthusiastic customers since 
October 1983. As a special limited offer, we've lowered the 
price of the complete ConIX system by 50% to only $79.95! 
Don't miss this opportunity to bring your 8-bit micro back into 
the software revolution. Order your copy of ConIX today! 

Price includes manual. 8" disk, and user support. 5>A" conversions 
available. Contact your local dealer, or buy direct and add shipping: 
$4.50 UPS. $10 Canada. $25 overseas. NY residents add sales tax. 

Computer Helper Industries Inc. 

P.O. Box 680 Parkchester Station, NY 10462 
Tel. (212) 652-1786 (for information/orders) 

' 'We 're helping your computer work better for you! 

UNIX: AT&T Bell Labi. CP/M: Digital Research. ConIX: Computer Helper Ind. 












MAONTOSHSA 

REGrSTEBED TH*OEMA« 

Of appie crjemfifTW inc 
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Poor Person Software 

Introduces 

Write-Hand-Man 

Desk accessories for CP/M 

Write-Hand-Man lets you take notes, check phone 
numbers, make appointments, and countless other tasks 
without leaving Wordstar, dBase, Multiplan, or any other 
application. Enter Write-Hand-Man with a single key- 
stroke and choose the program you want. When you 
leave Write-Hand-Man, your application continues 
normally. 

$49.95 plus tax delivers Write-Hand-Man and 4 
companion programs; Notepad, Phonebook, Calendar, 
and Termcomm. User written programs are easily added. 
All you need is M80 or some other LINK-80 compatible 
assembler. 

Other CP/M products available from Poor Person Software: 
Poor Person's Spooler ($49.95), Poor Person's Spelling Checker 
($29.95), Poor Person's Spread Sheet ($29.95). Keyed Sequential 
Files (S39.9S), Poor Person's Menus ($29.95), aMAZEing Game 
($29.95), Window System ($29.95), Crossword Came ($39.95), 
Mailing Label Processor ($29.95). Shipping included. 

All products available- on IBM 8 inch and Norlhstar 5 inch disks. Other 5 inch 
formats add $5 handling charge. No credit cards. 

Poor Person Software 

3721 Starr King Circle 

Palo Alto, CA 94306 

tel 415-493-3735 

CP'M is a registered irademark of Digiial Researcfi 
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EXOTIC LANGUAGE 
OF THE MONTH CLUB 



COMAL: A friendly micro language 



C 



OMAL(COM- 

mon Algorithmic 
Language) is a 
powerful personal computer language that 
combines the best features of several pop- 
ular languages. 

A COMAL listing initially resembles 
Pascal due to the editor's automatic inden- 
tation of the control structures, which 
emphasizes the intrinsic Pascal-like struc- 
ture of COMAL. On closer inspection, it 
reads like BASIC, because so many key 
words arc identical or similar, as shown in 
the simple example in Listing 1 . If a 
graphics procedure is examined, the code 
is a dialect of LOGO (Listing 2). These 
resemblances make COMAL instantly 
legible and easily learned by those who 
are already familiar with at least one of 
these languages. 

For programming novices, COMAL 
may be the best of all possible languages 
to learn since it provides a structured pro- 
gramming environment, the instant 
reward of excellent graphics, and upward 
familiarity with so many other popular 
languages. 

COMAL was originally developed by 
Borge Christensen in 1973 as a teaching 
language. His purpose was to retain 



By Mark R. Brown 

BASIC'S friendliness without its intrinsic 
sloppiness while providing Pascal's struc- 
tured programming environment without 
its inflexibility. 



T 



he COMAL stan- 
dards committee 
has established 



that COMAL be implemented as a kernel 
of standard commands augmented by 
extensions called packages. COMAL 
therefore retains a degree of trans- 
portability a level of magnitude higher 
than BASIC. A COMAL application writ- 
ten in kernel-level code should be fully 
transportable to other COMAL systems. 
The kernel contains the vocabulary neces- 
sary to perform all the standard I/O and 
processing functions. 

Math operators arc similar to those in 
BASIC and include some functions gener- 
ally found only in extended versions of 
that language, such as MOD and DIV. 
Unfortunately, the floating point precision 
is the same as BASIC'S, with no provision 
for double-precision math. Integer vari- 
ables and arrays in the 1 6-bit range are 
allowed in decimal, hexadecimal, and 
binary notation. Logical operators are 
separated into Boolean and bitwise func- 
tions. For example, A AND B will return 
TRUE if A and B are both true, whereas A 
BITAND B returns the bitwise logical 



AND of the values A and B . 

String functions resemble Pascal more 
than BASIC. Strings must be dimensioned 
before they can be used (for example, 
DIM A$ OF 6), though this is done auto- 
matically for input strings. Substrings arc 
accessed by specifying subranges by posi- 
tion. For example, \fA$= "ABCDEF" , 
then A$(2:4) is equal to "BCD " . The sub- 
range may be reassigned as A$(2:4): = 
"CHI" . and AS becomes equal to 
"AGHIEF". 

Inclusion can be checked with the IN 
function. "GHI" in AS would return the 
value 2 since GHI is now a substring of AS 
starting at position 2 . The BASIC function 
LEN is also available to determine the 
actual (not dimensioned) length of a 
string. All of the string operations may 
also be used on string array elements. 



c 



OMAL supports 
six common con- 
trol structures. 
These have all been implemented pre- 
viously in other systems, notably in Pas- 
cal and its progeny, though most lan- 
guages do not offer them all. 

The simplest of the structures is 
REPEAT. . . UNTIL, which provides a 



0010 FOR x:=l TO 10 DO 
0020 FOR y:=l to 10 DO 
0030 PRINT x;"+";y;"=";x+y 
0040 PRINT x;"- M ;y;"=";x-y 
0050 PRINT x;"*";y;"=";x*y 
0060 PRINT x;"/";y;"=";x/y 
0070 ENDFOR y 
0080 ENDFOR x 
0090 END 



Listing 1. 





0010 


PROC spiral boxes 




0020 


setheading{0) 




0030 


FOR side:=l to 24 DO 




0040 


box(50) 




0050 


left (15) 




0060 


ENDFOR side 




0070 


setheading(90) 




0080 


PROC box (length) 




0090 


FOR side:=l to 4 DO 




0100 


forward (length) 




0110 


left (90) 




0120 


ENDFOR side 




0130 


ENDPROC box 




0140 


ENDPROC spiral boxes 


Listing 2. 







65 



loop with a single exit condition tested at 
the end of the loop. WHILE . . , DO . . . 
ENDWHILE is essentially the same thing, 
but the exit condition is tested at the start 
oftheloop.Thusfl£P£>17\ . . UNTILis 
always executed at least once, but WHILE 
, , . DO. . . ENDWHILE will not be exe- 
cuted at all if the initial condition is not 
met. 

LOOP . . . EXIT WHEN , . . ENDLOOP 
is a halfway version of this type of struc- 
ture. The portion of the loop between 
LOOP and EXIT WHEN is executed every 
time through the loop, but the portion 
between EXIT WHEN and ENDLOOP is 
skipped after the exit condition has been 
met. 

FOR. ..TO. . .STEP. . .DO. . . 
ENDFOR is a BASIC FOR . . . NEXT loop 
with a couple of additions. STEP is, of 
course, optional. The loop control vari- 
able is local, not global, thus eliminating 
possible conflicts with other variables in 
the program. If a command is included 
after the DO on the control line, the loop 
is interpreted as occupying only a single 
line. For example: 

FOR X : = to 1 STEP 2 DO PRI NT X 

will print the even integers from to 10. 
The ENDFOR is not needed to indicate the 
end of the loop, and any value X may have 
held before entering the loop is 
unchanged. 

The IF. . . THEN. . . ELIF . . . ELSE 
. . . ENDIF structure has the same single- 
line format option for the simple IF. . . 
THEN case followed by a single oper- 
ation. The multiline version allows ELIF 
and ELSE to continue control if the first 
condition tests false. 

COMAL* s most powerful control struc- 
ture is CASE. . .OF. . . WHEN. . . 
OTHERWISE. . . ENDCASE. This allows 



multiple-choice type program flow, as in 
Listing 3. OTHERWISE is optional, but an 
error will occur if none of the cases speci- 
fied arc satisfied. 

If you are a die-hard BASIC program- 
mer and the idea of structured program- 
ming scares you, COMAL retains the 
GOTO statement, though its use is dis- 
couraged. It references not line numbers 
but LABELS. 

Program listings automatically indent 
program structures, making it easy to fol- 
low program flow. The change from Pas- 
cal's ubiquitous END; for every structure 
to a separate syntax for each type of loop 
makes listings clearer, too. If line num- 
bers bother you, the editor's DISPLAY 
command will list the program without 
numbers; they are used only by the editor 
and are never referenced by the program 
itself. 
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hree types of 
modules are used 
in COMAL. Error 
trapping is supported through the use of 
TRAP. .. HANDLER . . . ENDTRAP, 
which is similar to an IF . . . ELSE . . , 
ENDlF\oop. The portion of code follow- 
ing TRAP is executed if no error condition 
exists. If an error occurs, the HANDLER 
code is executed. 

System variables ERR. ERRFILE, and 
ERRTEXTS are used to determine the type 
of error encountered. REPORT canbe 
used to define error conditions other than 
those detected by the operating system, if 
necessary. 

The example in Listing 4 demonstrates 
a simple use of the TRAP module. In this 
example, the function will return any 
numeric value but will prompt the user 
with "Numbers Only" if nonnumeric data 
is entered. 

Listing 4 also illustrates another 
COMAL module, the FUNClion. These 
are defined and used as in Pascal. As is 
shown here, functions can be declared 
CLOSED, which makes all variables 



local. Individual variables may be be 
declared global by using IMPORT. A 
function may be numeric, array, or string, 
and always RETURNs a value. 

The third module type is a PROCcdure.. 
This is similar to a function but does not 
return a value. Procedures can also be 
CLOSED and can use the IMPORT 
option. In fact, functions and procedures 
share all their characteristics and options 
with the sole difference that functions 
return a value. 

Procedures and functions are allowed to 
be recursive in COMAL, as they are in 
most other languages with any real capa- 
bility. The old standby factorial function 
serves to illustrate recursion in COMAL 
(Listing 5) . You can see from this example 
that COMAL also allows nested functions 
and procedures. Once defined, functions 
are called by name. For example, 
faetorial(20) would execute the function 
factorial(n) , returning the value for 20! . 
Procedures can be called by name or by 
using the optional EXEC (procedure). 

COMAL procedures and functions may 
optionally be declared EXTERNAL. 
They must have previously been saved as 
disk files and will then be called from disk 
and overlaid on memory as needed. 
EXTERNAL procedures and functions 
must be CLOSED and may not use 
IMPORT. Listing 6 uses two external pro- 
cedures, add and subtract . 

The add procedure in Listing 7 is called 
from disk when needed and deleted from 
memory when done. If needed again, it 
must again be called from disk. While 
time-consuming, external procedures and 
functions allow much more flexibility 
when working in a limited memory space. 
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OMAL supports 
two sequential 

file types and a 
random file type. The standard ASCII file 
stores data as strings of characters. Each 
data element, numeric or string, is stored 




0010 


FUNC getnuni ( 1 in ,pos, prompt $) CLOSED 


0020 


DIM n$ of 20 


0030 


LOOP 


0040 


INPUT AT lin,pos,12: prompt?: n$ 


0050 


TRAP 


0060 


RETURN VAL(n$) 


0070 


HANDLER 


0080 


PRINT at lin,pos: "Numbers Only" 


0090 


FOR x:=0 to 1000 DO NULL 


0100 


ENDTRAP 


0110 


ENDLOOP 


0120 


ENDFUNC getnum 



Listing 3. 



Listing 4. 
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in sequence followed by carriage return 
and line-feed characters as delimiters. A 
binary file is more compact, storing data 
as it is stored internally in machine 
memory. Floating point numbers are 
saved in 5 bytes and integers in 2. Strings 
are stored using a 2-byte character count 
followed by the character data. 

Random files are more complex but 
allow freer access to data. The CREATE 
(filename$,x,y) command creates a ran- 
dom file with x number of records of 
length v . The number of records can be 
estimated initially and added to later, but 
the record length is inflexible once set. 
COMAL also features BASIC style 
READ and DATA statements for imbedded 
data files. It always comes as somewhat of 
a shock to BASIC programmers when 
they find out that Pascal and many other 
languages do not have this capability, so 
it's reassuring to find it included here. 
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or want of a better 
label, let's talk 
about system 
"friendliness." The COMAL editor is a 
marvelous piece of work and makes writ- 
ing programs ajoy. Besides the listing 
conventions mentioned earlier, it features 
AUTO numbering and RENUMbcring, 
DELete by range. LISTby procedure 
name, FIND and CHANGE, and options 
to list key words in uppercase or low- 
ercase (though it makes no difference how 
you enter them initially). Control keys 
handle advance-by- word, abort edit, 
erase-to-cnd-of-line, and many other use- 
ful word processor-type functions. 

COMAL also incorporates what is 
termed a three-pass run-time compiler. As 
a line is entered, syntax is checked. If an 
error is found, an error message is dis- 
played and the cursor is placed on the 
error. Once corrections have been made, 
the error message disappears, and any 
text it may have overwritten is replaced. 

The compiler even takes care of some 
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simple mistakes and omissions auto- 
matically. For example, it will insert an 
omitted DO, THEN, or OF, and will con 
vert NEXT 'to ENDFOR. This capability 
prevents a lot of headaches. 

At run time, the compiler checks for 
and reports errors in program structure 
then compiles a name table in memory. 
While COMAL is an interpreted lan- 
guage, its structure and tabic usage make 
it an average of three to four times faster 
than BASIC and much faster than that in 
searches and sorts. 

Once a program has been RUN (or 
SCANncd, which executes the compiler 
without running the program), functions 
and procedures can be called from direct 
mode as though they were COMAL key 
words. This can be very useful and is a lot 
of fun with turtle graphics routines. 

Variable and identifier names can be up 
to 78 characters long and can include the 
underline character as in Pascal, as well 
as apostrophes, brackets, etc. 

Screen input and output are very 
friendly, too. P«//vT includes the/17and 
USING options for screen formatting, and 
ZONE gives you control over the screen's 
tab positions. Input even has the AT 
option. 

In addition, input may be restricted to 
only as many characters as you need (up 
to 120), and the cursor and screen clear 
keys are modified to work only within the 
context of the specified input window. 



This can be combined with error trapping 
to produce truly faultless input routines. 

SETSCREEN and GETSCREEN allow 
the screen to be saved as a string variable, 
including cursor position. In this manner, 
a help screen or menu can be referenced 
and the screen easily restored when done. 

COMAL features one useful capability 
borrowed not from BASIC, Pascal, or 
LOGO, but from CP/M: batch files. 
Batch files are disk text files that are 
treated by the system as though they were 
typed in directly from the keyboard. They 
are useful for establishing initial system 
parameters, linking custom character 
fonts, copying files, or other repetitive 
tasks that would otherwise require oper- 
ator intervention. 
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ackages provide a 
means for extend- 
ing the COMAL 
kernel . They tend to be more system 
dependent. For example, the Commodore 
64 version of COMAL includes a SOUND 
package that provides access to its excel- 
lent SID synthesizer chip. (JOYSTICKS, 
PADDLES. LIGHTPEN, SPRITES, and 
character FONTs arc also supported by 
the Commodore 64.) 

Packages are written in machine code, 
UNKed to the COMAL kernel, and called 
with the USE command, as in USE 
SOUND . USE links the key word vocab- 
ulary of the package to the COMAL inter- 



0010 


FUNC factorial (n) 


CLOSED 


0020 


TRAP 




0030 


RETURN fac(n) 




0040 


HANDLER 




0050 


RETURN 




0060 


ENDTRAP 




0070 


FUNC fac(n) 




0080 


IF n=0 THEN 




0090 


RETURN 1 




0100 


ELSE 




0110 


RETURN fac(n-l)*n 


0120 


ENDIF 




0130 


ENDFUNC fac 




0140 


ENDFUNC factorial 





0010 


DIM replyS of 1 




0020 


LOOP 




0030 


PAGE 




0040 


PRINT "a - add" 




0050 


PRINT "s - subtract" 




0060 


PRINT "x - exit" 




0070 


REPEAT 




0080 


INPUT AT 5,1,1: "Your choice : ": 


replyS 


0090 


UNTIL reply $>"" AND THEN reply $ IN 


"ASXasx" 


0100 


CASE replyS OF 




0110 


WHEN "a", "A" 




0120 


add 




0130 


WHEN "s","S" 




0140 


subtract 




0150 


OTHERWISE 




0160 


EXIT 




0170 


ENDCASE 




0180 


ENDLOOP 




0190 


END "End of example." 




0200 






0210 


PROC add EXTERNAL "0:ext.add" 




0220 


PROC subtract EXTERNAL "0:ext.sub" 





Listing 5. 



Listing 6. 
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POWER 



..... . 



C LIBRARIES 
C WINDOWS 

Best You Can Get ! 

325 Fully Tested Functions 
SIX C LIBRARIES 

FUNCTIONS YOU DON'T HAVE BUT HEED! 
All Source Code. No royalties. 
51 screen handliniyjraphic 

functions S 4 9.95 

50 cu/sor/keyboard/dala 

input functions $39.95 
35 superior string 

(unctions S 59.95 

25 system status J control 

functions $29.95 

72 ulility/DOS/BIOS/timt/ 

date functions S49.95 
42 printer control 

functions S29.95 



RICHLY COMMENTED 
EASY TO LEARN 
EASY TO MODIFY 



NO MATTER WHAT ELSE 

YOU HAVE 

GET THESE!! 

ANY3LIBRAfiTES"$69.95 
ALL 6 LIBRARIES $99.95 

50 MOST NEEDED FUNCTIONS 
S 49.95 

POWER WIN DOWS 

PROFESSIONAL WINDOW MANAGEMENT 

OVERLAYS, BORDERS, 
POPUP MENUS, HELP WINDOWS, 
STATUS-LINE, COLOR HIGHLIGHTING, 
AND MOREill 

C WINDOWS: COMPLETE SOURCE CODE $99.95 



ALL LIBRARIES 

PLUS 

WINDOWS $149.95 

€ntelekon 

SOFTWARE SYSTEMS 



EHTELEKON 12118 KIHBERLET 
HOUSTON, TX. 77024 (713M6I-4412 
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preter. DISCARD is used to disconnect a 
package after it has been called. Packages 
can be called even in direct mode and their 
commands used from the keyboard. 

Graphics are implemented as a package 
in COMAL. This means they will vary 
somewhat from system to system, though 
the standards committee recommends 
LOGO-style turtle graphics. The Com- 
modore 64 system actually provides two 
mutually compatible graphics systems, 
Cartesian point-plot and turtle. 

The turtle is by far the most fun to use 
and the most rewarding for the beginner. 
The turtle can be manipulated inter- 
actively in SPLITSCREEN mode and can 
include prescanncd turtle graphics pro- 
cedures for drawing complex objects. 
LOGO shorthand is supported, so 
FORWARD(50) can be entered as FD(50) 
to save keystrokes. This package also fea- 
tures the only windowing capabilities I've 
seen so far for the Commodore 64. pro- 
viding for mixed graphics and text win- 
dows, screen-wrap options, and coordi- 
nate system scaling. 

The extensibility of COMAL through 
the use of packages is one of its most 
appealing features. Packages can be 
linked to the kernel when needed and dis- 
carded when not needed to free memory 
space and speed execution time. They 
provide a means to access machine- 
specific capabilities with high-level com- 
mands while still providing a cross- 
system compatible language kernel. They 
allow the addition of vocabulary 10 handle 
unforeseen future needs, such as when a 
new piece of hardware is added to a sys- 
tem. Packages can even allow for error 



messages to be provided in the native 
tongue of the operator. 
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here can 
COMAL be 

found? Well. 



it's starting to catch on. mostly in Europe, 
though its U.S. following is strong and 
growing stronger. IBM's recent 
announcement of COMAL for the PC is 
sure to add a boost to the movement. 
Apple is also reportedly working on a ver- 
sion (COMAL is available in Europe for 
Apple CP/M). 

As a personal computer language, it's 
hard to beat. It has the capability to handle 
everything from games to serious applica- 
tions and provides this in an environment 
that is structured and very fast for an 
interactive, interpreted language. If you 
have been looking for an alternative to 
BASIC or Pascal, or arc involved in 
teaching programming, COMAL may be 
just what you need . Hj 
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0010 


PROC add external proc CLOSED 


0020 


missed:=FALSE; count :=0 


0030 


WHILE NOT missed DO 


0040 


count : +1 


0050 


numbl:=RND(l,9) 


0060 


numb2:=RND(l,9) 


0070 


PRINT count, "> what is";numbl; 


0080 


PRINT "plus"; numb 2; 


0090 


INPUT " >": reply; 


0100 


IF reply-nujnbl+numb2 THEN 


0110 


PRINT "yes" 


0120 


ELSE 


0130 


PRINT "oops" 


0140 


missed :=TRUE 


0150 


ENDIF 


0160 


ENDWHILE 


0170 


PRINT "answers were right,"; 


0180 


PRINT "up to problem"; count 


0190 


ENDPROC add external proc 



Listing 7. 
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^3 j SuperFast Software Development Tools 



INCREASE YOUR PROGRAMMING EFFICIENCY 

with high-performance software development products from SLR Systems. 

No other tools approach the speed or flexibility ol the SLR Systems line. 

"Z80ASM Is an extraordinary product...", "...in two words, I'd say speed & flexibility", 

Robert Blum, Sept. 84 DDJ Edward Joyce, Nov. 84 Microcomputing 
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RMAC/M80 macros 
Nested INCLUDES & 
conditionals 
16 char, labels on 
externals 
Built in cross- 
reference 
Optional case 
significance 
Phase/dephase 



Math on external 

words and bytes 

Define symbols from 

console 

Generate COM, HEX, 

SLR-REL, or Micro- 

soft-REL files 

Time & Date in listing 

Over 30 configure 

options 



Z80ASM -full Zilog Z80 $125 

NEW! Z80ASM+ -all tables virtual $195 

NEW! SLRMAC -full Intel 8080, with 

Z80.LIB extensions internal $125 

NEW! SLRMAC+ -all tables virtual $195 

280 CPU. CP/M compatible. 32K TPA required 

"Z80ASM...a breath of fresh air...", 

___ Computer Language. Feb. 85 

y/SA | 

■■H C.O.D., Check or Money Order Accepted 
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wizard c 

Fast compiles, fast code and great diagnostics 
make Wizard C unbeatable on MSDOS. Discover 
the powers of Wizard C: 

• ALL UNIX SYSTEM III LANGUAGE FEATURES. 

• UP TO A MEGABYTE OF CODE OR DATA. 

• SUPPORT FOR 8087 AND 80186. 

• FULL LIBRARY SOURCE CODE, OVER 200 FUNCTIONS. 

• CROSS-FILE CHECKS OF PARAMETER PASSING. 

• USES MSDOS LINK OR PL1NK-86. 

• CAN CALL OR BE CALLED BY PASCAL ROUTINES. 

• IN-LINE ASSEMBLY LANGUAGE. 

• 240 PAGE MANUAL WITH INDEX. 

• NO LICENSE FEE FOR COMPILED PROGRAMS. 

The new standard for C Compilers on MSDOS! 
Only $450 



WSS 



For more information call {617} 641-2379 

Wizard Systems Software, Inc. 

11 Willow Cl., Arlington, MA 02174 

Visa/Mastercard accepted 
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• Links SLR & M80 
format files 

• Output HEX or COM 
file 

SLRNK+ includes: , 



LINKERS 



• Three separate 
address spaces 

• Load map and 
SID/ZSID SYM file 



AM tables overflow to 
disk 

HEX files do not fill 
unused space 
Intermodule cross- 
reference 
EIGHT separate 
address spaces 



Works with 

FORTRAN & BASIC 

Generate PRL & SPR 

files 

Supports manual 

overlays 

Full 64K output 



SLRNK -fastest memory based $125 

NEW! SLRNK+ -full featured virtual $195 

Combo Paks available from $199. - $299. 

For additional Information contact SLR Systems 

1-800-833-3061, in PA (412) 282-0864 

1622 N. Main St., Butler, PA 16001 ■ Telex 559215 

L R— Systems. 



PROLOG V 



The Language 

only of Artificial 
$6995 intelligence 



Examine the 
documentation lor 
30 days and return 
with disk stiil sealed 
for tuB refund, if not 
hilly satisfied. 



PHONE ORDERS: 
(619) 483-8513 



# 



Full Prolog as defined in Clocksin 
& Mellish, Programming in 
Prolog, Springer-Verlag, Berlin 
Heidelberg New York, 1981. 

User's manual with extensive tutorial, 
complete reference guide, and program 
examples. Custom-designed binder and 
slip cover. 

PC-DOSMS-DOS, 128KRAM 
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your software needs, talk to WATCOM— 
the people major software users around 
the world have trusted for years. 
WMCOM has the products you need to 
get the job done right. Proven performers 
like WATFOR*, WATFiV*, WATBOL*, 
and SCRIPT Plus new leaders in soft- 
ware for PC workstations and micro-to- 
mainframe communications. Networks, 
language interpreters and compilers. 
Text preparation and data management. 
All WATCOM products are human 
engineered to provide the optimum in 
people efficiency and productivity And 
they're designed to run compatibly on 
IBM mainframes and PC's, Digital main- 



odore 
micros. 

Whatever you need is backed up by 
WATCOM's innovative maintenance and 
support services. You'll be kept up to 
date with the latest in product enhance- 
ments and information. And our publica- 
tions and seminars will help you get the 
most: out of your software investment. 
WATCOM. Guality products. Professional 
service. And a reputation built on more 
than 150,000 licensed mainframe and 
micro software programs throughout 
the world. So talk to us before you 
decide. After all, choosing the right 
software is serious business. For you. 
And for WATCOM. 




Make the righ 



: WAT 



WISI9 
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■ WATCOM Int 
right choice in software for efficient program development 
in APL, BASIC, COBOL FORTRAN, or Pascal. 
WATCOM Interpreters emphasize error detection so that 
program corrections are more easily executed. Hard-to-find 
errors can be quickly located with the integrated debugging 
system for COBOL, FORTRAN, and Pascal. And programs 
can be efficiently entered and corrected with the integrated 
full-screen editor in all languages but APL. 




WATCOM Interpreters are available for IBM PC, IBM 370 
VM/SP CMS, ami Digital VAX VMS*. 
Make the right choice. Call or write WATCOM today and 
we'll tell you all about WATCOM Interpreters or any of 
WATCOM'S ot/~er people-efficient products. 



The right choice in software. 



Yesl I want to make the right choice in software. Send me more information on: D WATCOM INTERPRETERS □ WATCOM Software Catalogue 



Name:. 



Company:^ 
Title: 



Address:. 
City: 



State:. 



_Zlp:_ 



•WATFOR. WATFIV and WATBOL are registered trademarks of ihe Umeaity of Waterloo. 

•IBM PC ana IBM 370 VM/SPCMS are registered trademarks of International Business Machines Corporation. 

•VAX. VMS are registered trademarks of Digital Equipment Corporation. 



WATCOM PRODUCTS INC. 

415 Phillip Street 
Waterloo, Ontario, Canada 
N2L3X2 

(519) 886-3700 

Telex 06-955458 
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On-line with Ward Christensen 





he name Ward 
Christensen has 
become synony- 
mous with microcomputer telecommuni- 
cations and that widespread phenomenon 
called bulletin board systems. Now an 
IBM systems engineer living in the 
Chicago, 111., area, Christensen looks 
back on the early day s of micro com- 
munications and has some interesting 
tales to tell. 

As a self-proclaimed hacker, he prides 
himself in his ability to be a technical 
troubleshooter— both in his work and in 
his hobbying. "I enjoy solving prob- 
lems," says Christensen. "and to me true 
hacking comes from the phrase, 'can you 
hack it?'" 

"I guess I'm a hobbyist partly because, 
in a sense, I have no goals," he says. "I 
think that's part of what differentiates a 
person from hobbying and commercial 
efforts. I don't have this grandiose plan of 
being a millionaire, or of wanting to set 
the world on fire with some program, or 
just wanting to get organized, sell, and 
advertise something. I've always just 
enjoyed twiddling with electronics and 
things like that, seeing what I could make 
them do." 

Christensen recalls one of his earliest 
hacking challenges— the day he decided 
he wanted to build an auto-dialer for his 
phone. He imagined it would be a combi- 
nation of a file on disk containing a way of 
sending data across a phone line over and 
over again. "I imagined I could try setting 
up something like a relay that would open 
the line and pulse it to dial the number," 
he remembers. "Well, yeah, I can hack 
that! I can do the software and the hard- 
ware and whatever I need to get the job 
done." 

n college. Chris- 
tensen spent one 
year as a chemistry 
major; but one day he decided he didn't 
like college at all and dropped out. Instead 
he got a job tinkering with computers, 
which were very new at the time and not 
very powerful. With his new-found inter- 
est and talent, he soon was inspired to go 
back to college, all in the hopes of landing 




By Craig La Grow 



a job with IBM after graduation— which 
he was finally able to do three years later. 

"Maybe I wasn't smart enough to go 
looking for research or development jobs, 
which I probably would 've liked better," 
he says. "I just took an interview and 
wound up being thrown in the hat in Chi- 
cago and being picked by the Hammond, 
Ind.. branch for a job as a systems 
engineer— which is the technical support 
of sales, configuring and performance 
and things like that." 

Christensen worked with literally every 
level of IBM computer equipment and has 
only recently been assigned to work on 
technical support for the IBM PC within 
the company. "I have avoided micro- 
computers within IBM like the plague 
because hobby is hobby and work is work, 
and never the two shall meet," he says. 

Nevertheless, one day his boss showed 
up at his door saying, "We're tired of you 
helping everybody else in the area of PCs. 
How about helping IBM for a change?" 

Christensen now works in a Chicago- 
based IBM sales office as a technical trou- 
bleshooter, answering questions from 
large corporate customers like, "How do 
I get the Quiet Writer to work with my 
Display Write II?" He does customized 
system configurations, like networking 
PCs with an AT, for example. He also is in 
charge of putting on customer seminars 
and demonstrations for his office. 

Before the IBM PC came on the mar- 
ket, the big operating system for micro- 
computers was CP/M . In the CP/M pro- 
grammer's community, Ward Christensen 
is today regarded as one of the founding 
fathers of public domain software. He is 
especially recognized for his MODEM 
telecommunications program, which is 
best known today by a variety of names 
suchasMODEM7.COM, MDMxxx, and 
XMODEM.COM. 

But now Christensen has shifted his 
programming interests to the IBM PC and 
away from CP/M. "I decided one day that 
I just wanted something slower, with a 
lousy keyboard," he jokes. 

He says he made this change partly out 
of frustration. "But if you have to put it in 
a word, I'd say "ego'. I enjoy being knowl- 
edgeable on things. I don't like being 
asked questions that I can't answer all the 
time. People started coming up io me with 
IBM PC questions a lot, both within and 
outside IBM, and I discovered that I 



wasn't the expert. I didn't even have a PC 
then." 

"I don't know if I made this transition 
to the PC because CP/M was dead or 
dying or whatever. As a matter of fact, at 
that time there were certainly more CP/M 
machines out there than PCs, and there 
was also much more software available 
for CP/M. But that won't be for long. 

"Outside of CP/M. there are some very 
fundamental things that are nice, like tree- 
structured directories and date- and time- 
stamped files. Secondly, I think the PC's 
strongest suit is the fact that it is a stan- 
dard. The S-100 was a standard and fos- 
tered the growth of the microcomputer 
industry by having a standard place to 
plug your boards. If you wanted to make a 
who-knows-what board, there was a stan- 
dard bus to plug it into. 

"But the trouble was that there was no 
one company that was strong enough to 
drag the industry kicking and screaming 
into some higher level standards like a 
graphics board or communications inter- 
face. So the PC came along and, dis- 
regarding the better-or- worse, faster-or- 
slower issues, provided a standard 
interface for color graphics, a standard 
interface for communications, and large 
amounts of memory. 

"It was standard. So if someone wanted 
to come out with something like a good 
graphics board, it simply couldn't exist in 
the S-100 world because no single board 
maker could make enough of any one kind 
for a software house to have any prospects 
of marketing any reasonable quantities of 
their package. 

"Communication was different because 
people simply realized that you had to go 
through the effort of installing it for what- 
ever modem and board you had. But. with 
the PC and communications, all you had 
to do was just drop it in. Maybe it was 
COM 1 : or COM2 : , it 's not is it th is bit or 
that bit, is it ready when it's high or low? 
Plus you didn't have intcrrupt-driven 
things and so on. And now for graphics 
it's easy, now there's a big enough stan- 
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dard marketplace and a well-known 
graphics board that people can 
make things like Auto Cads." 

n the mid- 1970s, 
microcomputer 
hacking was just 
beginning. New ideas were being devel- 
oped by hobbyists across the country. 
"Back then, people had the benefit of just 
knowing the kinds of things that needed to 
be hacked," Christensen remembers. "If 
we're talking about public domain pro- 
grams, there are some standard programs 
like the library utilities and the squeeze 



and unsqueeze utilities that will exist no 
matter what the machine is. They are just 
fundamentally nice things to have 
around." 

"To me, the most difficult thing today 
is to find something to invent that hasn't 
already been done, and I had the supreme 
luxury of programming in a void." 

Christensen and Randy Suess"s system, 
CBBS/Chicago, is still running inSuess's 
basement. Christensen also has his own 
"test CBBS" running in his basement. 
The CBBS program they wrote is no less 
than 14,000 lines of 8080 assembler code 
and assembles into a 27K executable file. 

In terms of the language he likes best to 
program within, Christensen is definitely 
biased toward the assembly language 
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level. "We really don't need another high- 
or low-level language — we need an 
intermediate-level language. Wc need a 
language that understands the hardware 
just a little bit better, even better than C. I 
often see some pretty awful code which 
gets generated by C." 

But when Christensen originally wrote 
his CBBS program in 8080 assembler 
code, his intention was ironically not to 
create a system for file transfers. In fact, 
he never really did have a file transfer sys- 
tem up— except for very early on— and 
that was only for a little while. "I've 
always been more interested in what peo- 
ple have to say message-wise," he says. 

"In the early days, I remember putting 
up a message on my bulletin board saying, 
'Who put up the first remote CP/M sys- 
tem?' and the answer kept coming back, 
'You did!' Apparently I was the first per- 
son to put a system on-line that was not my 
only system," he says. 

But the real problem with file transfers 
at the time, notes Christensen, were the 
low-storage 70K disks. "People like 
Keith Petersen just kept calling in all the 
time and filling them! And I wasn't into 
wanting to see a bunch of code from other 
people. I had so many things that 1 was 
working on of my own that I took it back 
down after a fairly short while. But. sup- 
posedly, that was the very first dial-in 
CP/M system." 

In the beginning, CBBS was for any- 
body calling in with a dumb terminal. 
People with teletypes and built-in mod- 
ems would often take breaks by 
calling into Christensen's system from 
their office terminals at work. "It makes 
sense that CBBS wasn't set up as a file 
transfer system because most of the peo- 
ple with modems at the time didn't neces- 
sarily have computers," he says. 

Christensen set up CBBS with prompt 
bells programmed into the system so that 
every time it asked you to respond to a 
question like "What's your first name?," 
"Function?," "Enter Starting Message 
Number," etc., the system would go 
"BEEP!, BEEP!. BEEP!" This infuriated 
callers who left messages saying, "Can't 
you kill the bells?" 

"Aha! I know what's going on— the 
back rooms of industry are calling up 
CBBS during business hours, and they're 
being embarrassed by all the beeps," says 
Christensen. "So 1 put in a P command 
that allowed callers to turn off the prompt- 
ing bell. Immediately after that, I got back 
comments like, 'The back rooms of indus- 
try thank you!'" 
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I hristensen first 
came in contact 
I with acoustic 
modems back in the early 1970s when 
they were used mainly for terminals 
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dialing into mainframes. "Back then they 
had a nice-looking wooden box about 
5-in. wide and maybe 10-in. long and a 
foot high," he says. "And you would set 
the phone inside this cushioned, foam- 
protected and elegantly styled wooden 
box." 

He bought his first modem from a com- 
pany called Livermorc in 1974. This was 
the same brand of acoustic coupler that 
IBM was using internally at the time. "I 
really don't know how much before that 
time I actually started using them, along 
with a dial-up 274 1 sclectric terminal 
from work," he says. 

One problem with the Livermore 
modem, however, was that it was an 
"originate only" modem. But the packing 
materials for this modem also talked about 
an "originate/answer" modem that Chris- 
tensen realized must be the type he'd 
require to have two modems talk to each 
other, so he upgraded it immediately. This 
turned out to be a fortuitous decision, 
made three years before the invention of 
his file transfer protocol, which required 
one of the modems to be in answer mode. 

Christensen describes the invention of 
the bulletin board software concept: "If 
you've been to club meetings, you know 
how a cork bulletin board can play an 
important part — people offering to sell 
things, offers for group purchases, bad 
comments about products not recommen- 
ded to buy, etc. And I thought, why not 
just mechanize or computerize a bulletin 
board. That's how the name came about 
too," 

Between Christensen and his friend 
Randy Suess the term Computerized Bul- 
letin Board System (CBBS) was chosen 
for their new invention. "I really don't 
know if I invented the term or if Randy 
did. I have a hunch I did; but I have a very 
bad memory, and I hate to take credit for 
something I'm not sure of," says Chris- 
tensen. "I don't know if we hadn't actu- 
ally invented a BBS. whether somebody 
else would've or not." 

Christensen remembers that one night 
Suess was doing some pistol target prac- 
tice in the basement for fun— shooting at a 
target they had taped up on a wall, not 
realizing that the power cord for a wall 
clock lay behind the target. "With one 
shot, Randy managed to neatly sever the 
cord, and in doing so, blew a fuse and 
took the CBBS down," he says. 

"So the next day, as I called into CBBS 
to check for mail, a fellow had left me a 
message saying how the system had sud- 
denly froze on him and he was worried 
whether he had done something wrong to 
cause this. My reply was simply, 'No it 
wasn't you, Randy shot it! '" 

Christensen began working on the first 



version ofhisMODEM.COM program 
soon after he bought his first modem—the 
same time he was working on some lim- 
ited communications programming with 
large IBM systems. He also was shopping 
for a home computer. 

"I had manuals for the Data General 
NOVA and the TI 980A minis and things 
like that," he remembers. "For $10,000 
you'd get a couple cassettes and a thermal 
printer and 16K, and that wasn't exactly 
right." 

In 1 974, he was trying to build his own 
TTL-based machine at home. He often 
spent his evenings breadboarding things 
and oscilloscoping them, block diagram- 
ming, etc., with the intention of "getting a 
computer I could program." 



Yet when the January 1975 issue of 
Popular Electronics came out, the cover 
showed the new Altair microcomputer. "I 
said to myself, 'Now 1 don't have to build 
my own!'" 

During this time period he built things 
like hardware random number generators, 
shift registers, and little push button start- 
and-stop counters. Christensen even 
breadboarded the components for a minia- 
ture computer of his own. 

"But the Altair was really my saving 
grace," he admits. "I now could actually 
buy a machine and program it and not 
have to design and build one myself. 
While I sat impatiently waiting for my 
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Altair. I shopped through some magazines 
to get a disk drive system." 

Knowing his eventual goal was a com- 
puter with floppy disks. Christcnsen 
found and bought some dual-disk drives 
which stored 256K on a floppy disk stored 
in a rigid plastic case and read with a fly- 
ing head similar to the Bernoulli drives of 
today. 

"So I bought those drives, got my 
Altair. built my own interface to a select- 
ric typewriter, constructed my interface to 
the drives, and got a hold of a little 
assembler/editor from Processor 
Technology— 4K worth of programs that I 
received on paper tape. And 1 think I even 
typed in the hex for it. After thai I wrote a 
little hex loader. That's how I got a first 
little assembler/editor going. I used their 
video display module, or VDM , which 
really opened up the computer to 
usefulness. 

"So eventually 1 got to where I could 
load and save files and programs and do 
some assemblies on this kludge of hard- 
ware and software that really was not run- 
ning under any operating system per se. I 
adopted Processor Technology's 4K 
editor/assembler io include the video dis- 
play and the Tarbell cassette interface, 
which was very popular back then, soing 
1500 baud. 

"Consequently, the very first standard 
for public domain programming that 1 
became aware of was based on my per- 
sonal hardware configuration: the 
assembler/editor from Processor Tech- 
nology, the Tarbell cassette, and the Proc 
Tech video display board. I called it 
CCOS (Cache Cassette Operating Sys- 
tem), made some major changes to it in 
terms of the editor, and added a RENUM 
command for the assembler program. So 
we had a little library for cassette-based 
programs— games, life simulations, 
etc.." Christensen says. 

Much later, in January 1977, Chris- 
tcnsen acquired CP/M and worked with 
his friend. Robert Swartz, who had origi- 
nally convinced him to buy CP/M and 
taught him how to use CP/M's built-in 
assembler and editor. They wrote a little 
program that would essentially send an 
entire CP/M diskette, sector by sector, out 
to a cassette in modem format, meaning in 
Bell 103 tone. "I think I put a little check- 
sum after each block so that when I got it 
home, I'd be able to verify that everything 
had been read OK," he remembers. 

He then took that cassette back home 
and loaded it onto his disk, promptly dis- 
covering that CP/M itself had landed 
across the end of the tape being Hipped so 
he no longer even had a copy of CP/M 
itself. So, having invented his own disas- 
sembler, he took apart some of the other 
things on the CP/M tape and was able to 
reconstruct a working CP/M with a pro- 
gram called MOVCPM.COM. He relo- 



cated CP/M up to 1 6K or 20K 
and got it working again. 

Now Christensen finally had CP/M but 
was still running it on nonstandard floppy 
disks. By the time 1978 rolled around, he 
had invented a multifile, load-and-save 
program for the Tarbell cassette and was 
distributing public domain programs for 
it. This cassette-based system was an 
early way of exchanging files and was 
exclusive to a local club in the Chicago 
area called CACHE. 

"But I soon realized what a hassle it 
was doing copies and mailing them, and it 
just dawned on me that all the pieces again 
were in place to write a trivial protocol to 
beep a file over a modem to somebody 
else." he says. "About this time, the 
Hayes modem had come out, and it 
seemed that il was time to try doing some- 
thing like that. So I just threw the protocol 
together in a short time!" 

"When I started a block, for example, 
it had to have a start-of-header. a block 
number, and a block number complement. 
From a programming standpoint, I wasn't 
designing the big picture of it. I was say- 
ing, "Let's sec. how can I be sure to put in 
the right block number. Oh. I know, I'll 
put in a complemented block number 
rather than doing a CRC on the whole 
thing,' 

"Once I knew that the block number 
was right. I went to the data and I said I 
should do some checking on the data. I 
wonder what people do, maybe just a 
checksum, I'll just add them up and see, 
which I regret. Had I done something as 
trivial as add the carry-in every time I 
added I would have had an even belter 
reliability. 

"But I wasn't out to invent something 
famous, just to hack something together 
and get so I could transfer some files." 

The original MODEM.COM program 
was not a very large piece of code. Chris- 
tensen only implemented three options on 
it: a terminal mode, an echo mode, and a 
send-and-reccive mode. He then put his 
new program into the public domain 
through the CP/M Users Group, and peo- 
ple from all over the country began mod- 
ifying it. 

Mark Zciger from Flushing, N.Y., 
added some multifile capability. John 
Mahr in Chicago added a CRC. so the 
final vcrsionol"MODEM7.COM became 
much more user friendly, menu-oriented, 
and full-screen-oriented— with CRC and 
multifile transfer. 

But Christensen had long since gotten 
out of the business of modifying his own 
MODEM.COM program by then. "1 
basically kind of threw it into the public 
domain and then walked away," says 
Christensen. "I was not the type to devote 
the rest of my life to supporting every pos- 
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sible modem and everybody's idea of 
what the program ought to be. I just left it 
up to them." 

"The problem with MODEM.COM 
early on was that I couldn't just send the 
program over the phone lines directly to 
the first people or even give them the 
disk," he recalls. "1 could give a cassette 
of it to the few people who had my cas- 
sette load-and-save program that I put in 
the public domain earlier." 

"Quite frankly, the CP/M Users Group 
was kind of a one-way street. I would send 
things into it by cassette, but not many 
people had compatible disks with my sys- 
tem at the time to send me back any- 
thing," says Christensen. "But that was 
the price of wanting to be the first kid on 
the block with disks, and I think I was. 
I'm pretty sure I had mine going well 
before MITS had shipped the disks for 
their Altair." 

On his original MODEM.COM pro- 
gram and for a few versions thereafter, 
Christensen was involved in the pro- 
cram's progress within the public domain. 
He recently discovered that the earliest 
written date he could find on his program 
was an assembly language comment dated 
Sept. 23, 1977. 

But after the M0DEM4.COM version. 
Christensen gave up trying to keep up 
with the program's progress. Yet, after 
some prodding from a few friends. Chris- 
tensen finally did break down and give the 
newMODEM7.COM a try. 

"So I got it. and the first time I tried to 
use it 1 typed M0DEM7 SODV.600 FILE- 
NAME. TYP and it said 'Invalid Option.* I 
suddenly realized that my own program 
didn't even understand the options I pro- 
grammed in it! And the next thing I typed 
was ERA B-.M0DEM7. COMV 
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1 oon to follow the 
I invention of 

'modem.com 

was another crucial invention created by 
Dave Jaffe. also from the Chicago area. 
Called BYE.COM, this new program ran 
up in high memory and allowed the 
modem to act as the remote console to a 
system, permitting people to run com- 
mands from a modem on another system. 

Christensen got BYE.COM from Jaffe 
and modified it for the PMM1 modem, 
which was then vastly overtaking Hayes in 
popularity because it could go 600 baud. 
He modified it to PMMIBYE.COM and 
put it in the CP/M Users Group. 

During this time, Keith Petersen from 
Royal Oak, Mich., was often calling into 
Christenscn's CP/M system. 

"Keith was the guy who thought user 
friendliness was important," says Chris- 



tensen. "And therefore he said he would 
take MODEM— which was a program that 
was really meant (particularly with the 
PMMI) to set the baud rate, set originate 
and answer mode, prompt all along the 
way for things like 'Waiting for Sector.' 
strip it down to its bare minimum compo- 
nents and have only two commands (Send 
and Receive), and not change originate/ 
answer or the baud rate," 

XMODEM was then born at the hands 
of Keith Petersen, who took Christensen's 
M0DEM.COM program, stripped it 
down so that it simply was able to run on a 
system running BYE.COM using a com- 
mand as simple as XMODEM S 
FILENAME. 

"So I never really invented XMO- 
DEM." says Christensen. "The reason 
XMODEM became equated with my pro- 
tocol was that people weren't sure 
whether MODEM was the name of a pro- 
gram or the piece of hardware by the same 
name! It was just too obscure of a word, 
and I regret having not thought of some- 
thing more clever for the original name of 
it." 

"Yet, people would say to me. T have a 
question on your XMODEM protocol," 
and I would become staunchly defensive 
and say. ' Oh. you mean my MODEM pro- 
tocol?' Eventually I succumbed and I now 
realize that it's got a new name. And well 
it should for being able to distinguish 
from the hardware that's involved." 
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'MODEM for the 
IBM PC is an 
Lcntirely different 

story for Christensen. After he purchased 
his first IBM in January 1984. he was 
obviously interested in picking up a 
modem program for it. and he found one 
in the public domain called 
MODEM7PC.EXE. 

"After I got it and tried it out, I realized 
it didn't work at all at 9600 baud. And it 
didn't work for the most fundamental of 
reasons— namely, because the IBM PC 
screen is so god-awful slow at scrolling 
that it would say 'Waiting for Sector' 
often. But by the time the PC had finished 
scrolling, the header was already past the 
block that was coming in. So if you 
cleared the screen and were transmitting 
a file less than 20 blocks, it would be re- 
ceived." he says. 

Christensen now uses a program called 
Professional YAM (which stands for Yet 
Another Modem), which was written in C 
originally for CP/M. It was later signifi- 
cantly enhanced by its author Chuck Fors- 
berg and moved over to the PC as a com- 
mercial product. 

"Anyway, I admit it, I do get a kick out 
of seeing my name in books and pro- 
grams. Every time I see a book on IBM 
PC communications, for example, I open 
it up and look for my name," he jokes. 
"And when I find references to XMO- 
DEM. I think 'Oh well, I didn't quite 
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make it in that one.' But then next I'll find 
a book that has an appendix called The 
Christenscn Protocol and I feel much 
better!" 



IC 



Ihristensen's 
name is now used 

las the title for a 
protocol that's become a standard in the 
industry. As a by-product of this 
notoriety, he has had numerous job offers 
from companies like Lifeboat, NorthStar, 
and MicroStuff. He has never accepted 
any, preferring to continue working for 
IBM. 

Because Christensen chose to put his 
MODEM.COM program into the public 
domain, he thereby released any legal or 



commercial control over the program's 
future. Part of his reason for doing this, 
he says, was because of his employment at 
IBM. "If I were just a programmer at 
some company, I don't think I'd have 
conflict-of-interest thoughts running 
through my mind," he says. "But because 
I work for IBM and as a result have kind 
of sold my soul to the company store, I 
thought I'd be better off giving it away." 

"The protocol is actually not that big a 
deal." he says. "I mean, it was the right 
place at the right time. It wasn't that good 
or anything, it was just the first one." 

Christenscn chose to design the proto- 
col around an 8-bit model and went 
against the attempts by a group called 
PC-NET. which was trying to establish a 
7-bit protocol. "They were trying to be all 
things to all people in terms of having a 
7-bit protocol capable of efficiently trans- 
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wearing thin, who wants to spend 
your valuable time programming 
instead of twiddling your thumbs 
waiting for slow compilers, who 
just wants to work fast, then it's 



time you programmed with the 
BDS C Compiler. 

BDS C is designed for 
CP/M-80 and provides users with 
quick, clean software 
development with emphasis on 
systems programming. 



BDS C features include: 



■ Ullrafast compilation, linkage and 
execution that produce directly 
executable B0SCVZ80 CPrM command 
files. 

A comprehensive debugger that 
traces program execution and 
interactively displays both local and 
external variables by name and 
proper type. 

Dynamic overlays trial alow lor run- 
time segmentation of programs too 
large to lit into memory. 



■ A 120-lunction library written in both 
C and assembly language with full 
source code. 

Plus . . . 

• A thorough, easyt&read. 181-page 
user's manual complete with 
tutorials, hints, error messages and 
an easy-to-use index — -is the 
Defect manual for the beginner ana 
the seasoned professional. 



' An attractive selection of sample 
programs, including MODEM- 
compatible telecommunications. 
CP/M system utilities, games and 
more. 

A nationwide BDS C User's Group 
[S10 membership tee — application 
included with package! thai olfers a 
newsletter, BDS C updates and 
access to public domain C utilities. 



Reviewers everywhere have 
praised BDS C tor its elegant 
operation and optimal use of 
CP/M resources. Above all. BDS C 
has been hailed for it's rema/Kable 
speed. 

BYTE Magazine placed BDS 
C ahead ol alt other 80BWZB0 C 
compilers tested for fastest 
object-code execution with all 
available speed-up options in use. 
In addition, BDS C's speed of 
compilation was almost twice as 



last as ifs closet competitor 
(benchmark for this lest was the 
Sieve of Eratosthenes!. 

"] recommend both the 
language and the implementation 
by BDS very highly.'' 

Tim Pugh, Jr. 

in In/owerU 
"Performance; Excellent 
Documentation: Excellent 
East of Use: ExorUffit " 

InfM'ortd 

Software Report Card 
"... a superior buy . . 

Van Court Hare 

in LifelinesThe Softuatv 

Mcgoiine 




Dont waste another minute on 
a slow language processor. Order 
your BDS C Compiler today! 

Complele Package (two 8" SS5D disks. 

181-page manual): 5150 

Free shipping on prepaid orders inside 

USA, 

VtSA/MC, COD'S, rush orders accepted. 

Call lor information on other disk 

formats 

BOS C is designed lor use with CPi'MaO 
operating systems, version IX or higher. It is 
nol currenily available lor CPIMeS or MS- 
DOS 



BD Software, Inc. 
P.O. Box 2368 
Cambridge, MA 02238 
(617) 576-3828 




ferring 8-bit data. I think what it amounted 
to was every 3 bytes having 2 characters 
or something like that and some encoding 
with multiplying and shifting, etc." 

"Since CP/M was the software bus, it 
W'as a very standard, known environment. 
You knew what a file looked like— it had 
128-bytc sectors; it might have had tabs in 
it if it was ASCII: if it was ASCII it ended 
with a Control-Z, except for the rare case 
when it ended right on a sector boundary. 
You knew what you had and there wasn't 
anything too inconsistent between that and 
CP/M systems," says Christensen. 

"Way back then, I was talking with 
Don Brown of Potomac Micro Magic 
(PMMI). who said that 1 28 bytes was not 
an unreasonably sized block because if 
you went with a very short block (say 10 
bytes), your overhead would be signifi- 
cant and your turnaround time too, and so 
on. And if you went with IK, in the earlier 
days your line noise and modem quality 
might cause significant retries." 

ut the program- 
ming world has 
changed in 
certain ways since the mid-1970s, claims 
Christensen. 

"Today, instead of inventing creative 
solutions to programming problems, you 
end up spending most of your time seeing 
if someone else out there has already 
solved the particular problem before. And 
after you've found 10 people out there 
who have done it, you ask yourself if their 
program will meet your particular needs. 

"Admittedly, I think there arc still a few 
niches I can fill. For example, I think 
there's a need for a good interactive disas- 
sembler like my RESOURCE under 
CP/M. Most disassemblers nowadays 
seem to be oriented toward an I/O re- 
directed output from DEBUG, which 
isn't interactive and so on." 

"I'm on my fourth or fifth micro right 
now," says Christensen. "My Altairgave 
way to my IMSAI . and I think I went 
through two Vectors and a little HX-20 
along the way. One of the Vectors is still 
used as my bulletin board. And the IMSAI 
is still my main CP/M system for main- 
taining and putting up new versions of 
CBBS." 

1985 will also be the year of The Hob- 
byist 2400 he claims. "With modems now 
appearing on the market that are compara- 
ble in price with 1200 baud modems, I 
think that people will soon be saying 'why 
shouldn't we go twice as fast?'" 

Christensen looks forward to the future 
of the digital telephone where telecommu- 
nications at 9600 will become routine. He 
also envisions artificial intelligence as the 
real long-term future of computing in 
ceneral. 
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Slash Programming Time in Half! 

Wi,h FirsTime 

• Fast program entry through single keystroke statement generators. 

• Fast editing through syntax oriented cursor movements. 

• Dramatically reduced debugging time through immediate syntax checking. 

• Fast development through unique programmer oriented features. 

• Automatic program formatter. 



FirsTime is a true syntax directed editor. 

FirsTime ensures the integrity of your programs by 
performing all editing tasks like moves, inserts and 
deletes along the syntactic elements of a program. 
For example, when you move an IF statement, 
FirsTime will move the corresponding THEN and 
ELSE clauses with it. 

Even FirsTime's cursor movements are by syntax 
elements instead of characters. The cursor automati- 
cally skips over blank spaces and required keywords 
and goes directly to the next editable position. 

FirsTime is a Syntax Checker 

FirsTime checks the syntax of your program 
statements, and also: 

• Semantics like undefined variables and 
mismatched statement types. 

• The contents of include files and macro 
expansions. 

• Statements for errors as they are entered 
and warns you immediately. 

FirsTime is a Program Formatter 

FirsTime automatically indents statements as they 
are entered, saving you from having to track indenta- 
tion levels and count spaces. 



FirsTime has Unique Features 

No other editor offer these features: 

The Zoom command gives you a top down view 
of your program logic. 

The View command displays the contents of 
include files and macro expansions. This is 
valuable to sophisticated programmers writing 
complex code or to those updating unfamiliar 
programs. 

FirsTime's Transform command\ets you change 
a statement to another similar one with just two 
keystrokes. Forexample,youcan instantly trans- 
form a FOR statement into a WHILE statement, 

The Move at Same Level command moves the 
cursor up or down to the next statement at the 
same indentation level. This is very useful. For 
example, you can use it to locate the ELSE 
clause that corresponds to a given THEN clause 
or to traverse a program one procedure at a 
time. 

FirsTime is Unparalleled 

FirsTime is the most advanced syntax directed 
editor available. It makes programming faster, easier 
and more fun. 



■ i 




TO ORDER CALL (201) 741-8188 

or write: 



Spruce Technology Corporation 



189 E.Bergen Place 
Red Bank, NJ 07701 



In Germany, Austria and Switzerland contact: 

Markt & Technik Software Verlag 
Munchen, W. Germany 
(089)4613-0 



r irsTime is a Iradernark of Spruce Technology Corporation * MS-DOS is a trademark of Microsoft Corporation 
BM is a Iradernark of International Business Machines. Inc • Turbo Pascal is a Iradernark ol Borland International 
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"I foresee the day when you will tell 
your computer to review your in-basket 
and calendar — il will then tell you the 
most urgent things you should be doing," 
he says. "People will probably become 
quite dependent on these kinds of systems 
because they'll be an enormous productiv- 
ity tool." 

Christenscn also hopes the future will 
hold a greater opportunity for what he 
calls "customized deliverables." 

"Televisions and things like that are 
mass marketed, but there may spring up 
information and entertainment services 
that are specialized to every possible area 
of social and intellectual activity." he 



says. "Somehow, I think there needs to be 
a way of making things more interesting 
and more selective to the individual's 
taste. Maybe that can be done now on 
such things as CompuServe, where you 
can do such things as key word searches 
on articles, etc," 

"More important than anything, 1 have 
become someone who has more friends 
who I've never met because of the elec- 
tronic mediums, because of CBBS. Com- 
puServe, etc. And I think that electronic 
mail is a very important and useful way 
for things to happen in the future." 

"The problem today with services like 
CompuServe is that you don't just auto- 



If you're tired of waiting, 

you're using the wrong file manager. 




Be fast. Btrieve.™ 

If batch jobs and reports turn wait- 
ing time to nighttime, then wake up! 
You're using the wrong file manager. 

Btrieve™ file management hates 
waiting as much as you do. It's writ- 
ten in assembly language especially 
for the IBM PC . And based on 
b-tree file indexing, with automatic 
balancing for access speed that won't 
degrade as your database grows. With 
Btrieve, your applications always run 
fast. So you'll be out the door faster. 

The standard for networking. 
Btrieve/N (network version) sets the 
standard for the industry's most 
popular LANs, including IBM's PC 
Network. Btrieve/N offers safe net- 
work file management that coor- 
dinates simultaneous updates and 
prevents lost data. 

Automatic file recovery. Btrieve pro- 



system crash. Your Btrieve data always 
comes back intact. 

Fully-relational data management. 
SoftCraft's entire family of products 
gives you a complete, fully-relational 
database management system. 
Rtrieve™ adds report writing capabili- 
ties. Xtrieve™ speeds users through 
database queries with interactive 
menus. 

For professional programmers. 
Btrieve is the fast, reliable answer for 
all vour application development in 
BASIC, Pascal, COBOL, C, FORTRAN, 
and A PL. With Btrieve, you can 
develop better applications faster. 
And know they'll run— fast. 




SoftCraft Inc. 

P. O. Box #917 Austin, Texas 78766 
(512) 346-8380 Telex 358 200 



vides automatic file recovery after a 

Suggested retail prices: Btrieve, $245; Btrieve/N, S595; Xtrieve, SI95; Xtrievc/N, $395: Rtrievc, SS5, 
Rlrinr/N, $175. Requires PC-DOS or MS-DOS l.X. 2.X. or3.X. 
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matically get your mail: you have to go 
and get it. The beauty of the U.S. mail is 
that it's just there when you want it. You 
can do all this now with a bulletin board, 
but it's all within a very elite community," 
says Christenscn. "I think a big problem 
also is that bulletin boards are basically 
single-user, until you get into the UNIX 
ones that are multiuser, and as a result 
they're often busy and therefore cannot be 
considered a viable utility." 

Christensen also says he thinks the 
United States Postal Service could well 
become the medium for a nationwide elec- 
tronic network. "Just in the fact that they 
have so many physical buildings, they 
could start putting computers in them. 
And, as the volume of paper mail goes 
down and the volume of electronic trans- 
fers go up, they would then be nicely situ- 
ated to make a .slow conversion to elec- 
tronic types of mail." 

On the subject of bulletin board and 
network security. Christensen is an ada- 
mant supporter of keeping systems pub- 
licly open as much as possible. "A lot of 
them are just going private today, and I'm 
trying like crazy to keep the world's oldest 
BBS open on your first call so you can 
leave a message and do what you like," he 
says. "I do that by having both myself and 
a dozen other people who call on a very 
regular basis to police the system. But it's 
enormously frustrating to have such bla- 
tantly obscene and inappropriate mes- 
sages put up as often as they arc." 

"It almost makes me wonder if there 
haven't already been some electronic 
banking rip-offs that have just not been 
publicized because it would shake up too 
many people," says Christensen. "Like, 
for example, what just happened in Ohio 
where one state-chartered savings and 
loan closed and its closing put a run in 
people's minds. I'm not saying there'd 
ever be such a run, but the banking system 
would always be trying to protect its 
image against such situations ever 
becoming known." 

Christensen is also a strong opponent of 
copy-protected software. "I find it just 
significantly inconvenient," he says. 
"Since the world was able to get along 
with it under CP/M, I think I could get 
along without it now. Quite frankly. I 
refuse to trade some company's paranoia 
against my inconvenience." 

"I guess basically it comes down to 
something even more fundamental than 
any of that." he says. "I consider myself a 
very high-integrity, honest person and 
resent being reminded of how corrupt the 
world is." W 

Craig LaGrow is Editor o/COMPUTER 
LANGUAGE. 
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THE fifth generation language 
R O L O 



tmp4«in*riimg ir* fy.il EdfTBufflh S/m#J< »s fl**c- tb*e by 
Ctocioon arvd Mulhoh. RvcognJcsd &y J*p*n n providing 

utp»rtB#i*d oppwiu^ty for li-M^ati Mett^eac* 



Appl/xmLfod*: 



Highlight* of LVM Prolog: 



iThfl highest level o) a heirarcrnal 
robotic control sysiem, 



t Machine recognition of natural 
language. 



k Expert systems and knowledge 
engineering. 



Option**! 



k Special libraries 

k Language extensions 

fzducisiicn.-.'i Package 

$29.95 

(M5DOS) 



kType LVM Prolog makes possible irie 
execution of Al applicallons previously 
only possible on a mainframe. 

a Invisible compilation to a semantic 
nelwork provides the flexibility of ihe 
interpreted mode and the speed ot a 
compiler. 

A Virtual memory and a sophisticated 
cache algorithm limited only by the 
DOS, typically 2 gigabytes. 

ASynian superset with many extensions 
such as pattern specified insertion 
and deletion, clause indexing, robotic 

control. 

A Unlimited number ot resident and 
virtual modules, each up to 2 giga- 
bytes in size. 



aTHE most cost efficient package in the Industry. 
S5QO- (MSDOS version) Also available lor Xenix, Un x. CP/M68K 



*<ZW\ 



iVISA. Maslercard, AMEX 

icall or write for brochure 



1570 Arrsn Way Dreaftof. PA 19025 technical: <215)646-48&4 orttra: (215)355-5400 



the 

^source debugger' 

for lattice C 

Your lime and convenience come 
first! The MSD C Debugger' - is the las!, 
' and perhaps final, word in programming 
assistance tor Lattice C users. C Debugger 
produces a high level view of C programs 
via function names, line numbers, variable 
names and C data types, plus a low-level view 
of machine addresses and instructions for 
testing assembler language (unctions. 
More features include: 

• All documentation is prepared for 

programmers. 
1 Online help screen throughout the 

process. 
1 Capability to single step 
through your program. 
' Set break points, examine registers and j 
variables. 

5165.00 + S3.50 shipping^ 
T5T i 



IXYSffl 



To order, call or write: 

MICRO-SOFTWARE DEVELOPERS, INC. 

214 Vi W. Main St. • St. Charles, IL 60174 
312/377-5151 

Lattice C is a trademark o! Lattice. Int 
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Now With Windowing! 
$49.95 Basic Compiler 



MTBA5IC 

Features: 
Multitasking Windowing 
Handles interrupts Interactive 

Fast native code Compiles quickly 
Floating point No runtime fee 

MTBASIC is a true native code compiler. It runs Byte's Sept. "81 
sieve in 26 seconds; interpreters take over 1400 seconds! Because 
MTBASIC is multitasking, it can run up to 10 Basic routines at the 
same time, while displaying ten separate windows. Pop-up/down 
menus are a snap to implement. 

The MTBASIC package includes all the necessary software to 
run in interpreter or compiler mode, an installation program (so 
any system can use windowing), three demonstration programs 
and a comprehensive manual. 

AVAILABLE for CP/M (Z-80), MS-DOS, and PC-DOS systems. 

ORDERING: Specify format when ordering. We accept Visa, MC, 
checks and COD. Send $49.95 plus $3.50 shipping and handling 
($10 overseas) to: 



i 



Or I AID, Inc. 1 



P.O. Box 2412 Columbia, MD 21045-1412 
301/792-8096 
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ORDER COMPUTER 
LANGUAGE BACK ISSUES 
WHILE THEY LAST! 

Only a limited quantity of magazines is available, so 
order today. To receive your back issues, just fill out this 
coupon and mail it back with a check for $4.00 per 
issue. 



Premier 
Oct. '84 
Nov. '84 
Dec. '84 
Jan. '85 
Feb. '85 
Mar. '85 
Apr. '85 
May '85 
Jun. '85 



. copies x 
. copies x 
. copies x 
. copies x 
. copies x 
. copies x 
. copies x 
. copies x 
. copies x 
. copies x 



$4.00=$. 
$4.00=$. 
$4.00=$. 
$4.00 = $. 
$4.00 = $. 
$4.00 = $. 
$4.00 = $. 
$4.00 = $. 
$4.00 = $. 
$4.00 = $. 
Total = $. 



Foreign orders: Add 53.00 lor airmail. 

NAME 



COMPANY 

ADDRESS 

CITY STATE, ZIP . 



Send payment and coupon to: 
Computer Language 
Back Issues 
131 Town send St. 
San Francisco, CA 94107 
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plut# 



PLUTO— MORE THAN JUST A BASIC! 

PLUTO is a powerful, multiple user Business Basic programming 
environment (or the IBM PC, XT, AT and the PC compatibles. 
In addition, PLUTO interprets MAI/Basic Four and Science 
Management Corporation SMC Business Basic programs to 
run on microcomputers. 
Powerful features of PLUTO not found in other Basics: 

• Multiple user capabilities on DOS 2.0 (and above) 

• Indexed and direct files 

• Access to host system text (serial) files 

• Record and file locking 

• Trigonometric, logarithmic and exponential functions 

• Menu driven resource configurator 

• Multidimensional arrays and vectors 

• Binary and string logical functions 

• Extended position function 

• Public programming 

• Supports ghost tasks 

• Fully formatted output 

• Up to 255 files per program 

All of this for only S595.00. CALL TODAY! 



3 Q-17 San Fernando a /w , 
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THE STRUCTURED 

PROGRAMMING TOOL 

FOR MODERN TIMES 



Design your programs right on the screen, using modern 
techniques based on the popular Jackson Structured Program- 
ming method (JSP)! 

DEZIGN is more than just another flowcharting tool. It is an 
integrated tool for designing and documenting programs and 
for generating ADA, C, PASCAL, and PL/I source code, as well 
as dBASE II and dBASE HI command tiles. 

DEZIGN enables you to create Data and Program Structure 
Diagrams using the Sequence, Selection (IF-THEN-ELSE), and 
Iteration (DO WHILE) constructs; assign detailed statements 
to the diagrams; and synthesize source code from the control 
logic represented on the diagrams and the detailed statements 
assigned to them. 

DEZIGN lists for S200. It runs on the IBM PC, XT, or AT and 
requires 128K RAM, one disk drive, and an 80-column color 
or monochrome display. 

• DEZIGN-PC runs under DOS 2.0, 2.1, and 3.0. 

• DEZIGN-86 runs under CP/M-86 1.1. 

Want to learn more? Please contact us concerning pricing and 
availability of JSP reference texts and seminars. 

ZEDUCOMP • P.O. BOX 68 • STIRLING, NJ 07980 



(201) 755-2262 



dBASE II and dBASE III are trademarks of Ashlon-Tate, Inc. 
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SPARRY BASIC-B COMPILER 



1. Floating Point Math 

2. Use all 640K of Memory 

3. Multiple Data Segments 

4. Multiple Code Segments 

5. Internal ISAM File support 

6. 4 Virtual Screens (Big Windows) 

7. Easy Assembly Language Interface 

8. Direct System Interrupt Calls 

9. A Compatible BASIC Compiler 

Req. PCDOS2.00+ with 128K 

Sparry Software Labs 



P.O. BOX 632 
MILFORD, MA01757 
617-473-5435 



( ) Compiler S159 
( ) Demo DiskS15 



PCDOS is a Trademark of 
International Business Machine Corp. 
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WRITE 



The Writer's Really Incredible Text Editor lives up to its 
name! It's designed for creative and report writing and 
carefully protects your text. Includes many features 
missing from WordStar, such as sorted directory listings, 
fast scrolling, and Irial printing to the screen. All editing 
commands are single-letter and easily changed. Detailed 
manual included. Dealer inquiries invited. WRITE is 
S239.00. 

BDS's C Compiler 

This is the compiler you need for learning the C language 
and for writng utilities and programs of all sizes and 
complexities. We ofter version 1.5a, which comes with a 
symbolic debugger and example programs. Our price is 
(postpaid! S1 30.00. 



Tandon Spare Parts Kits 

One door latch included, only $32.50. 

With two door latches S37.50. 

Door latches sold separately for $7.00. 



All US orders are postpaid, We ship from stock on many 
formats, including; 8", Apple, Osborne. KayPro. Otrona, 
Epson, Morrow, Lobo. Zenith, Xerox. Please request our 
new catalog. We welcome COD orders. 



Workman & Associates 

1 1 2 Marion Avenue 
Pasadena. CA91106 
(818) 796-4401 
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PRODUCT BINGO ® O <8> Ot8> O ® O 



Each month Product Bingo features the latest in new soft- 
ware and hardware products of interest to COMPUTER 
LANGUAGE readers. Product Bingo items are based on 
information received from the manufacturer and are not 
meant to be product evaluations, reviews or endorsements. 
To find out more about o particular product simply circle the 
appropriate number on the Reader Service card — you'll 
receive information directly from the manufacturer. 

Note to manufacturers: Send new product information to 
Doug Millison, Product Bingo, COMPUTER LANGUAGE, 
137 Townsend St., San Francisco, Calif. 94107. 



New tools for C, Al programmers 

From CCA Uniworks comes the Safe C Family, consisting 
of run-time analyzer, interpreter, dynamic profiler, English- 
to-C, and C-to-English translators. Also introduced are three 
new languages for Al programming. COMMON LISP is a 
flexible version of LISP. OPS5 is a new VAX language. 
MPROLOG is based on PROLOG. Prices were unavailable 
at press time. 

CCA Uniworks, 20 William St., Wellesley, Mass. 021 81, 
(617)235-2600. 
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Software development under UNIX 

Software Development Systems Inc. announces signifi- 
cant enhancements to the UniWare Software Develop- 
ment System for development under UNIX. 

Improvements include an absolute-listing generator, more 
sophisticated link editor, object module librarian, and 
others. 

Software Development Systems Inc., 3110 Woodcreek 
Dr., Downers Grove, III. 60515, (312) 971-8170. 
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New Microsoft C compiler, Macintosh 
BASIC 

Microsoft Corp. has released a new C compiler, promising 
increased execution speed and program compactness. Sug- 
gested retail price is $395. Version 2.0 of Microsoft BASIC 
for Macintosh accesses all unique user interface features. 
Suggested retail price is $ 1 50. 

Microsoft Corp., 1 0700 Northrup Way, Box 97200, Bel- 
levue, Wash. 98009, (206) 828-8080. 
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New C profiler, compiler 

Catalytix Corp. has released the Safe C Dynamic Pro- 
filer and the Safe C Compiler. 



By Doug Millison 

Prices for the Safe C Dynamic Profiler range from $200 
For MS-DOS to $ 1 ,500 for VAX 1 1 /780. Prices for the Safe 
C Compiler range from $400 for MS-DOS to $4,000 for 
VAX 11/780, 

Catalytix Corp., 55 Wheeler St., Cambridge, Mass. 
02138,(617)497-2160. 
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FORTRAN graphics library for IBM PC 

Tekmar, a FORTRAN library allowing powerful graphics 
functions to be called From programs, has been released by 
Advanced Systems Consultants. 

The Tekmar graphics package, including FORTRAN 
object libraries and application source, is $195. 

Advanced Systems Consultants, 18653 Ventura Blvd., 
Ste. 35 1 , Tarzana, Calif. 9 1 356, (8 1 8) 990-4942. 
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BaZic86 links NorthStar, IBM PC 

Micro Mike's Inc. introduces BaZic86 and several utilities 
for NorthStar and I BM PC users. BaZic86 allows NorthStar 
BASIC of BaZic80 programs to run on the IBM PC family 
and other MS-DOS computers. Also available are utilities 
allowing transfer of NorthStar BASIC programs and data 
files from Northstar DOS to CP/M formats. 

Micro Mike's Inc., 3015 Plains Blvd., Amarillo, Texas 
79102,(806)372-3633. 
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New multiuser, multitasking system 

From Inner Access Corp. comes the MultiUser-1 6 com- 
puter system. MultiUser-16 supports from eight to 64 users, 
with ,5MB memory expansible to 16MB, 

Multiuser- 1 6 is priced at $8,995 to authorized dealers 
andVARs. 

Inner Access Corp., 5 1 7K Marine View, Belmont, Calif. 
94002,(415)591-8295. 
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Extended PIP utility released 

XPIP, a system utility released by System Facilities Inc., 

provides an easy-to-use interface for users of MS-DOS, 
PC-DOS, and CP/M operating systems. 

XPIP is priced at $29.95. 

System Facilities Inc., P.O. Box 7079, Charlottesville, Va. 
22906,(804)977-5245. 
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SuperSoft 
Diagnostics 

When Reliability 
Counts 



Protect yourself from timerobbing system failure. 
Pinpoint costly hardware problems before they 
cause serious trouble. Diagnostics II from Super- 
Soft can help you eliminate hardware problems, 
service calls, and data loss due to system failure. 

End Users 

Diagnostics II is the finest set of system diag- 
nostics available for microcomputers, ft thoroughly 
checks memory, CPU, terminal, printer, and disk 
drives - isolating many problems to the chip 
level. It checks both standard and non-standard 
components, including non-IBM add-ons. The 
memory test is particularly powerful; incorpo- 
rating a quick test, walking bit test, bum-in test, 
and speed test to make sure every bit of memory 
is completely reliable. 

Manufacturers 

Hardware manufacturers, systems houses, and 
service organizations - we can tailor our diag- 
nostics software to your specific needs. We have 
developed custom diagnostics for companies 
such as NCR, XEROX, MORROW DES1GMS, and 
SONY. From easy to operate user level diagnostics 
to exhaustive service level tests, we can provide 
the expertise you need. 

So whether you're an end user, service technician, 
or system manufacturer, get SuperSoffs Diag- 
nostics II for yourself and keep your system 
in great shape. 

Diagnostics II 

(for all PC DOS, MS DOS, CP/M-86, and 

CP/M-80 systems): $125 

Call for pricing on customized versions. 

TO ORDER CALL 
800-762-6629 

(in Illinois call 217-359-21 12) 

or SEND YOUR CHECK OR CREDIT CARD 
INFORMATION TO THE ADDRESS BELOW. 
Add $3 shipping U.S., $6 Canada, $20 all other 
areas. Please specify your computer and operating 
system. (C.O.D. orders also accepted) 

SuperS ft 

SuperSoft, Inc. P.O. Box 1628, 
Champaign, IL 61820 
Telex: 270365 SUP ACI CHM 



Write it once! 

MasterFORTH 

Portable programming environment 
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Whether you program on the Macintosh, 
the IBM PC, an Apple II series, a CP/M 
system, or the Commodore 64. your pro- 
S~~ ^fc^ gram will run unchanged on all the rest. If 
-=> tm you write for yourself. MasterFORTH will 
protect your investment. If you SSS^SJi = 
write for others, it will expand ] == -— = 

your marketplace. ^SSSS = T = tm 

_^ MasterFORTH is a state-of-the-art imple- 

mentation of the Forth computer language. 
Forth is interactive -you have immediate 
tm feedback as you program, every step of the 
way. Forth is fast, too, and you can use its 
built-in macn assembler to make it even 
faster. MasterFORTH's relocatable utilities, V\,E\ 
transient definitions, and headerless code >-Z3 tm 
let you pack a lot more program into your memory. The 
resident debugger lets you decompile, breakpoint, and 
trace your way through most 
programming problems. A string 
package, file interface, and 
full screen editor are all standard features. 

MasterFORTH exactly matches the Forth-83 Stan- 
dard dialect described in Mastering Forth by Anderson 
and Tracy (E3rady. 1984). The standard package in- 
cludes the book and over 100 pages of supplemen- 
tary documentation. 

MasterFORTH standard package 

Macintosh S1 25 

IBM PC and PC Jr. (MS DOS 2.1) 1 25 

Appfe II, II+, lie, lie (DOS 3.3) 100 

CP/M 2.X (in several formats) 100 

Commodore 64 1 oo 

Extensions 

Floating Point (1 984 FVG standard) $40 

Graphics (Apple II series) 40 

Module relocator (with utility sources) 60 

Printed source listing (each) 35 

Publications 

Mastering Forth (additional copies) $18 

Thinking Forth by Leo Brodie 16 

Forth-83 International Standard 15 

Rochester Bibliography. 2nd ed 15 

1 984 Rochester Conference 25 

1984 J1 0/ Forth Appl. & Res. 2(2) 15 

7983 FORML Conference 25 
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SOFTWARE REVIEWS 



Con IX 



Hardware Requirements: 

CP/M 2.2 or equivalent 

system (including emulators) 
Price: $165 
Available from: Computer 

Helper Industries Inc., P.O. 

Box 680, Parkchester Station, 

N.Y. 10462,(212)652-1786. 
Support: Telephone and mail 

support included in price, 

updates $20 

There has been a great deal (this may be 
the understatement of the century) of cov- 
erage in the last few years on the UNIX 
operating system. Most of this has been 
laudatory, with the result that nearly 
everyone now coming out with new 
machines is putting some form of UNIX 
work-alike out with it. Those of us with 
older machines, running with CP/M on a 
Z80, seem to be left out in the cold. We 
suffer a lack of more modern features that 
the UNIX people have, in exchange for 
maintaining compatibility with our 
already extant large software base. 

Naturally enough, a number of soft- 
ware entrepreneurs found the situation 
intolerable. They asked themselves if 
there was any way to graft onto CP/M the 
desirable features of UNIX, such as I/O 
independence and a programmable com- 
mand interpreter with I/O redirection, 
while still not interfering significantly 
with existing programs. Not surprisingly, 
the answer to this question turned out to 
be a resounding "yes!" 

The market soon became flooded with 
replacement command interpreters for 
CP/M which supported most, if not all, of 
the better features of the UNIX shell. 
Having worked with quite a few of these 
products (and written one myself), I can 
say that all are successful to some degree, 
but most have flaws. When Console Input 
executive (ConIX) was made available to 
me for review, I did not expect to be sur- 
prised, but I was and, on the whole, pleas- 
antly so. 



ConIX by Computer Helper Industries 
Inc. in New York, N.Y., is not just 
another command control processor 
(CCP) replacement. It supports all the 
standard CP/M CCP features but goes a 
great deal farther in flexibility than any of 
the other CP/M shells I've seen. 

It goes beyond them by extending the 
BDOS itself to provide extra CP/M func- 
tion calls for accessing the ConIX data 
areas and functions. It supports the usual 
features of console I/O redirection and 
shell programming language, but even 
these have some twists that were pleasant 
surprises. 

The package came to me with a stan- 
dard 8-in., single-sided, single-density 
CP/M disk, a very nice manual and a 
licensing agreement/ warranty. The agree- 
ment was one of the more reasonable of its 
genre I've seen, although still drenched in 
legalcsc. a language that could never be 
programmed. 

The manual is exceptionally well- 
designed, with a complete table of con- 
tents and index, and is printed in a stan- 
dard typeface. I'm one of those people 
who read the manual first, shocking as 
that may be to some, and I found it very 
clear and concise in most areas. 

It took me a while to get through it; it's 
about an inch thick. When I finished I 
found that I still had nine pages of extra 
information to print out of the .DOC files 
on the disk. Most of the addenda consisted 
of still more features that had been added 
after the manual was printed. 

When I put the manual down, the 
phrase "rampant optionitis" kept running 
through my mind. If all you count is num- 
ber of options and built-in commands, this 
system has all of its competitors beat. Of 
course, just because it has all these 
options docs not mean that you must use 
them all or even need to remember them. 
The options arc there if you need them, 
and the very good table of contents and 
index makes finding them very easy. 

Installation is a snap. The manual and a 
.DOC file provide a step-by-step process. 
At first I simply took the defaults. The 
system is provided in a format much like 
DDT or ZSID, and one of the things the 
install process does is generate a 
CONIX.COM file sized to your specifica- 
tions so that relocation is not necessary 
each time the system is loaded. 



The install process also allows you to 
disable the two features of ConIX that 
might cause problems. ConIX will patch 
the BIOS vectors in order to do I/O redi- 
rection in certain cases. Some systems 
cannot tolerate this, so one INSTALL 
option is to disable BIOS patching. 

I had a problem here. Both my CCP and 
BIOS were nonstandard, and this caused 
INSTALL to generate a ConIX that went 
off into cast hypcrspacc when loaded. 
When I went back to my vanilla CP/M, as 
I got it from the people who made my disk 
controller, everything went as specified. 

The other feature that might cause trou- 
ble is the ExpanDiskVirtual Floppy 
option. If this one has to be disabled in 
your system, I commiserate with you. 
This option lets you access all 16 logical 
drives that CP/M allows even if you only 
have two physical drives. 

Any references to the virtual drives 
causes a mount message to be issued and 
the logical drive to be logged in and asso- 
ciated with a physical drive. This means 
the "Disk Full" message loses a lot of its 
terror since you can mount a fresh disk 
where the full one was. Very handy and 
unique to ConIX. 

Once installed. ConIX is invoked just 
as any other program. It comes up with a 
copyright notice and then looks for a pro- 
gram called PROFILE.COM. This is usu- 
ally a ConIX command language pro- 
gram, which sets all the default options 
and does whatever initialization processes 
the user wants, such as issue a log-on 
message. (The .COM might be confusing, 
but I'll get to the unique aspects of ConIX 
command language programming later.) 

When PROFILE terminates, ConIX 
types its characteristic prompt and waits 
for the user commands. My only com- 
plaint is that the manual docs not clearly 
explain the function of the PROFILE pro- 
gram. I wasted a lot of time trying to fig- 
ure out why my keyboarded option set- 
tings were vanishing under certain 
conditions. 

The utility programs that come with 
ConIX arc also unique to this type of 
package and prove to be very useful. 
ARM is a file archiver, similar in function 
to the famous public domain program LU. 
Using ARM, the user stores files in a 
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library format: thus, related data can be 
stored in a single place. 

Since CP/M allocates disk space in 
fixed size blocks, storage of small files in 
a library can also save a significant 
amount of disk space. For instance, on my 
system, the smallest possible unit of disk 
space is 2K. If I have a file only 100 bytes 
long, most of that 2K is wasted. If I have 
10 files, each 100 bytes long, then the 
total space I need is only 2K, but CP/M 
will force me to use 20K of disk space. 

Using ARM , I can gather these 1 files 
into a library that may take only 4K 
(2K for the actual data and 2K for 



control information). This is nice enough; 
additionally. ConIX allows you to specify 
that libraries be searched for programs 
automatically. If you have a lot of little 
utilities lying around, you can put them in 
a library that ConIX will search when you 
invoke the program in the usual manner. 
The archiver also has time- and date- 
stamp capability and will store a short 
description of each member when it is 
added to the library. I was unable to cause 
it to malfunction, but I did note that when 
a large number of files were in the library, 
performance was rather poor. On a fast 
floppy or a hard disk, it probably would 



ARE YOU TRYING 
TO COMMUNICATE ? 



C programs can communicate with the world now through the power of 
The Greenleaf Comm Library. Now from the people who brought you The 
Greenleaf Functions General Library for C, comes this rich interrupt driven, 
ring-buffered asynchronous communications capability. 

Over 100 functions in C and assembler to facilitate communications at up to 
9600 baud. Up to eight ports at a time. ASCII or XMODEM. X-On/X-Off too. 
Hayes compatible modems controlled here. Safe too, bet you can't exit your 
application with interrupts hot. Major applications around the world base 
their communicating applications on The Greenleaf Cornm Library, Stop just 
trying and start really communicating. Get your copy of The Greenleaf Comm 
Library today. For all major C compilers, all models, all versions. For the 
IBM PC and just about any machine with MSDOS and an 8086. Comes with 
source code, extensive examples, demo programs, featuring C-Terminal, 
reference card and newsletter. No royalty. $185 

Other Products: The Greenleaf Functions General Library, over 220 
functions for total control of the IBM PC, with source. SI 85 for the compilers 
listed below. (See ordering instructions below). 




Specify compiler when ordering: Lattice, Microsoft, Computer Innovations, 
Mark Williams, or DeSmet. Add $7.00 for UPS Second Day- Ail (or J5.00 for 
ground). Texas residents add sales lax. Mastercard, VISA, check, or P.O. 
In slock, shipped same day. 



For Information: 

214/446-8641 



□ General Libraries 


$185 


DComm Library 


$185 


□ CI186 Compiler 


$349 


D Lattice C 


$395 


□ Mark Williams 


$475 




GREENLEAF 
SOFTWARE <e 



PRICES ARE SUBJECT TO 
CHANGE WITHOUT NOTICE. 



2101 HICKORY DR. 
CARROLLTON, TX 75006 



not be noticeable. However, on my vener- 
able Shugart 801s, it was. 

The MAN utility should be familiar to 
UNIX fans out there. The utility gives on- 
line help on the ConIX commands. The 
MANual files are created and maintained 
by ARM. If you forget an option or com- 
mand, the command MA N - < manual 
file > gives a table of contents of the man- 
ual file, and MAN < subject > < manual 
file > gives a detailed explanation of the 
subject from the specified manual file. 

The MANual system is a necessity in a 
system this rich. Fortunately, the manual 
files don't use that much space. ARM is 
apparently very efficient in its library 
format. 

The printed ConIX manual is very well- 
organized. However, after a while, I 
found it was easier and faster to use the 
on-line help feature. The fact that ARM is 
used to build the help files makes it possi- 
ble to easily add help entries for your own 
programs or modify existing entries if you 
feel they are a little less clear than they 
could be. 

The built-in commands and features arc 
the real stars of this show, though. These 
range from the standard DIR command to 
I/O port access from the command line. 
There are shell variables that can be used 
to store strings and numbers, and the 
string variables are nonvolatile, being 
written to disk. 

Shell variables are also used to imple- 
ment programmable function keys. You 
can have up to 52 (A-Z, a-z) arbitrary 
strings stored on disk, ready to recall at 
the touch of a user-selectable lead-in key. 

An example of this might be helpful. 
My terminal will generate a 0D0H when a 
special key is hit. so 1 decided that this key 
would be appropriate as a lead-in charac- 
ter. Using the built-in option command, 
OPT, I assigned this value as the PFK 
lead-in byte: opt +jk OdO. Then 1 used the 
S£Tcommand to assign a string to the 
shell variable &4 : 

seta = "dir b:^m 

After this, hitting < special > A generates 
dirb: with a < return > . As far as any 
program, using either BDOS or BIOS 
console I/O, is concerned. I typed that in. 

Other internal commands allow direct 
manipulation and examination of 
memory, the ability to load executable 
files at any address, and saving memory 
to disk from any address— thus elimi- 
nating the need for the CP/M SAVE com- 
mand. They also do general file manage- 
ment, copy files, type files, erase files, 
etc., without invoking separate programs. 

CP/M's various user areas arc directly 
accessible since ConIX extends the stan- 
dard file name to include a user-area des- 
ignator. B:15fZAP. COM references the 
file ZAP.COM on drive B. user-area 15. 
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All the ConIX utilities will accept this 
form, but most CP/M programs will not. 
This can be a real problem, but it is possi- 
ble to get around it by a little creative use 
of ConIX command files, of which more 
wil! come later. 

There is an option to extend the number 
of user areas accessible from the com- 
mand line from the 1 6 that CP/M nor- 
mally allows to 32. 

There is also a command to list direc- 
tories of other user areas, no matter what 
user area is current. This is something 
I've felt was missing from CP/M, and it's 
nice to find that others feel the same way. 

Like other products of this type, ConIX 
supports I/O redirection to or from a pro- 
gram. It goes farther than the others in the 
way it implements the feature and in the 
options possible. Console I/O is redirec- 
table in the usual manner; unusual is that 
printer I/O is also redirectable (inci- 
dentally, the package includes a built-in 
print spooler as well). 

ConIX also supports the unique ideas of 
memory files and memory I/O. This 
means that if you have the memory space, 
you can redirect I/O to or from memory 
buffers, as if the memory were a device. 
You can specify the addresses and sizes of 
the buffers and then use them like small 
files at a rather astonishing performance 
advantage. 

You can even pipeline the output of one 
program into the input of another using 
memory, which is more like the UNIX 
concept of a pipe than is usually possible 
on CP/M-based machines. Of course, a 
problem remains; this is still basically 
CP/M , so one program must finish before 
the other can start. If the memory buffers 
overflow, the system can get written over, 
and the user gets the privilege of hitting 
the RESET button. 

Speaking of pipelines, ConIX has an 
approach to this very useful feature that 1 
wish I had thought of. Since CP/M is a 
single-thread operating system, true 
UNIX-style pipes arc impossible, so pipes 
are implemented as temporary files that 
are managed by the system: 

prog! ] prog2 

is rendered (invisibly) as 

progl > temp.fil ; prog2 < temp.fil ; 
era temp, fil 

ConIX is different from other products 
of its type, in that to maximize perfor- 
mance, you have an option in where the 
invisible temporary file is placed. If you 
have a memory drive or a hard disk, plac- 
ing the temporary pipe file there can yield 
practically instantaneous throughput. 



Most of the other CCP replacements 
improve on the SUBMIT capability of 
CP/M. Some merely support straight-batch 
processing, while others have a complete 
command language with decision capabil- 
ities, looping constructs, etc. 

ConIX is one of the latter, with a differ- 
ence. The shell programs are compiled 
into a pseudocode and then executed 
intcrpretivcly. The output of the compiler 
is a .COM file with a special header. After 
compilation, the user cannot tell if the 
program executing is true machine code 
or a ConIX shell script. (A compiled shell 
script will not execute under pure CP/M, 
however. The first instruction is a RET, 
which simply sends you back to the CCP.) 

As with regular .COM files, you have 
the advantage of archiving the compiled 
shell scripts into the default library and 
then executing them in the normal man- 
ner. Since the scripts do not have to be 
kept in text form, you can reclaim a lot of 
disk space. 

In many ways the command language is 
more a programming language than a 
classical command language. It has 
WHILE loops, IF-TH EN-ELSE decisions, 
SWITCH multiway branches, error trap- 
ping, keyboard-interrupt processing, sub- 
routines (with GOSUB < label > and 
RETURN) and even the ubiquitous GOTO 
< lube! > statement. The AND and OR 
logical operators are implemented also. 

One possible problem in the system is 
that all the conditionals test the ConIX 
exit status, which the built-in commands 
and utilities set. Ordinary CP/M pro- 
grams do not set this status, so the condi- 
tionals can't directly be used on the typi- 
cal user program. Ways around this exist. 
The one suggested in the manual is to cap- 
ture output from the program and test for 
known strings in this output. Though 
clumsy, it does work. 

I wish I had room here to show one of 
the command programs that came with the 
package, a menu-driven, general-purpose 
utility program reminiscent of SWEEP. 
Unfortunately, the thing takes about five 
pages and has options for examining and 
altering files, memory, and I/O ports, 
copying files, interactively deleting files, 
copying memory to disk, etc. It's 
impressive. A somewhat shorter example 
command language program is in Listing 
1 . This is a quick and dirty routine I wrote 
to send a variable number of form feeds to 
my printer. It illustrates some aspects of 
the command language. 

if semp "?1" \<\> ""; then 

echo "$1\\" > @0040-0041 
else 

echo "1\\" > (§0040-0041 
endif 
while - test $@0040 0; do 

echo "1 > :1st 

sub $§0040 1 > @0040-0041 
end 

Listing 1. 



REMOVE 
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from your C programs 
with 

PC-LINT 



PC— UNT analyzes your C programs (one 
or many modules) and uncovers glitches, 
bugs, quirks and inconsistencies, It will catch 
subtle errors before they catch you. 

PC— LINT resembles the Lint that runs on 
the UNIX O.S. but with more features and 
greater sensitivity to the problems of the 
8086 environment. 

• Full K&R C 

• Supports Multiple Modules— finds incon- 
sistencies between declarations and use 
of functions and data across a set of 
modules comprising a program. 

• Compares function arguments with the 
associated parameters and complains if 
there is a mismatch or too many or too 
few arguments. 

• All warning and information messages 
may be turned on and off globally or 
locally (via command line and comments) 
so that messages can be tailored to your 
programming style. 

• All command line information can be 
furnished indirectly via fiiefs) to automate 
testing. 

• Use it to check existing programs, pro- 
grams about to be exported or imported, 
as a preliminary to compilation, or prior 
to scaling up to a larger memory model. 

• All one pass with an integrated pre- 
processor so if s very fast. 

• Has numerous flags to support a wide 
variety of Cs, memory models, and 
programming styles. 

• Introductory Price: $98.00 MC, VISA 

(Includes shipping and handling) PA residents add 6% 
sate lax. Outside USA add 5 10.00. 

• Runs on the IBM PC (or XT, AT or 
compatible) under DOS 2.0 and up, with 
a minimum of 128 KB of memory. It will 
use all the memory available. 

%wm §(9cra» 

3207 Hogarth Lane • Collegevilie, PA 19426 
(215) 584-4261 

• Trademarks: IBM (IBM Corp ). PC-LINT tOmpcl Software), 
UNIXIAT&T] 
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An explication is in order. The program 
is invoked by tof < n > . where n is the 
number of form feeds desired. If <n > is 
missing, ii defaults to one. The first line 
checks for the presence of an argument. 
Note that $1 is used in tne same manner 
that SUBMITuscs it. The backslashes are 
escape characters needed to prevent inter- 
pretation of < and > as redirection 
operators. 

SCMP and ECHO are built-in func- 
tions, the former initiating a string com- 
parison and the latter simply printing its 
arguments. Note the memory redirection, 
storing the value in the command line at 
address $0040. The TEST command com- 
pares the value at $0040 with and sets a 
status flag, which the — operator then 
inverts, so this is a while not zero loop. 

In the loop body, ECHO copies a form 
feed to the standard output, which is redi- 
rected to the :LSr device, then the SUB 
command subtracts one from what is 
stored at $0040 and stores the result back 
there. The executable version of the code 
in Listing 1 is less than 128 bytes long. 

All of this power does not come without 
a price. ConIX lakes up more than 28K. 
This means that unless something can be 
done to alleviate memory constraints, a 
great many standard programs simply will 
not run. 

Happily, the ConIX architect (I can't 
believe that something this clean was 
thrown together by a committee!) has a 
solution to this. When an external pro- 
gram is invoked. ConIX frees a user- 
specifiable amount of memory space for 
the program's use and. after program ter- 
mination, will reload the segments of 
itself that were freed. This memory man- 
agement is necessary for a program this 
size and seems to be very well 
implemented. 

Eight levels of management exist, rang- 
ing from level one, which, basically, frees 
nothing but allows a user program to use 
all aspects of the ConIX internal com- 
mands, to level eight, which frees every- 
thing except a small system loader. One of 
the option (OPT) commands will set the 
default level. For any individual program, 
a command-line option sets the memory- 
management level for that invocation 
alone. 

After your program executes, the 
loader will reload the freed segments and 
restart ConIX. This memory management 
is invoked only for running .COM-type 
files that are not compiled shell scripts 
identified via the special header. 

The manual needs work in this area. I 
found myself spending a great deal of time 
doing things like shifting default manage- 
ment levels around before it became clear 
what was going on. 

User support is very important in the 
software game, especially for a package 
as complex as ConIX. 1 called Computer 
Helper Industries twice during the course 



of the review process, without identifying 
myself as a reviewer. Both limes my ques- 
tions were answered quickly and courte- 
ously, a pleasant change from some other 
companies I've had to call. The person I 
spoke with seemed to be genuinely con- 
cerned with solving any problems I might 
have. This is a definite plus in favor of 
Computer Helper Industries . 

All in all, ConIX impressed me very 
favorably. I was unable to find any real 
bugs (and I carry a very powerful Murphy 
field around with me). The few items I 
found to disagree with me could legiti- 
mately be called personal pecadillos. 



There arc a couple of features I wish 
were there, of course: there always arc. 
For instance, ARM can be patched to 
access a real-time clock if one is present 
in your system. I would like to see hooks 
fordirect command-line access to the date 
and time as well. 

Overall though, ConIX is a very fine 
piece of work that can significantly 
reduce the effort needed using a 
CP/M-based micro and also act as a vehi- 
cle for familiarization with more powerful 
operating systems. 

By Daniel Lunsford 



CSHARP Realtime Toolkit 
CGRAPH 



Hardware required: Any 

computer with a C compiler 
Price: CSHARP-$600.00 (sin- 
gle user license), CGRAPH — 
$49.95 
Available from: Systems Guild 
Inc., P.O. Box 1085, Kendall 
Square Station, Cambridge, 
Mass. 02142, (617)451-8479 
Support: Full technical support 
for CSharp 

Programming for industrial and sci- 
entific process control applications often 
begins with a state diagram, a graphical 
representation of a state system. Since 
the computer typically has to monitor 
numerous sensors and control various 
pieces of equipment in response to dis- 
crete and asynchronous inputs, a state 
system description is usually the best way 
to visualize the process. 

Once a state diagram has been pre- 
pared, however, the task remains to con- 
vert it into working code by using an 
inherently unstructured maze ofif. . . 
then . while . . . do and goto statements. 
Such code is tedious to write and subject 
to subtle errors that manifest themselves 
only after the software has been 
commissioned. 

Ideally, a set of software tools should be 
available to allow the programmer to 
directly enter a description of the state 
system itself and let the computer simu- 
late its operation in response to defined 
inputs. It would be even better if these 
same tools could handle the lower-level 
details of process control programming as 
well, such as developing code for the real- 
time scheduling of prioritized procedures, 
defining and monitoring hardware and 
software-initiated events, and defining 
hardware interrupts in a consistent, 



processor-independent manner. 

Continuing with the wish list, why not 
ask that these software tools generate effi- 
cient C source code and that the source 
code for the tools themselves be available 
for custom modifications and extensions? 
Finally, let's request a complete real-time 
data processing utility for graphics dis- 
play on a CRT or plotter. 

Welcome— with a few minor 
limitations— to Systems Guild's CSHARP 
Realtime Toolkit. 

To fully appreciate what CSHARP has 
to offer, you need to be proficient in C 
programming and also understand the 
architecture of your particular computer 
system. This software package is defi- 
nitely not for the novice— it is a set of pro- 
duction tools for the professional working 
with real-time computer applications. 

The Toolkit is divided into five distinct 
tools: CISR, CEVENT, CSCHED, 
CSTATE. and CGRAPH. Each can be 
used independently of the others and are 
extremely useful as such. However, the 
true power of CSHARP becomes most 
apparent when the tools are combined to 
create a complex set of state systems. In 
combination, they can be considered as a 
hierarchy: 

CGRAPH -> CSTATE -> CSCHED -> 
CEVENT-> CISR 

CGRAPH works very well as a stand- 
alone software tool— so well that Systems 
Guild offers a version of it as a separate 
and inexpensive package. The discussion 
of CGRAPH at the end of this review 
shows in detail what you can expect from 
CSHARP. Here is a brief look at the other 
four tools. 

CISR— interrupt servicing. CISR 
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consists of only two functions, newisrl) 
and oldisrf) , that arc used to dynamically 
declare C procedures as interrupt han- 
dlers. This is an elegant concept that 
extends C's famed software portability to 
the hardware level. Interrupts are 
notoriously dependent upon the specifics 
of the machine and operating system. 
CISR hides these dependencies beneath a 
consistent C source level interface. 

CEVENT— symbolic event handling. 
Moving up the hierarchy brings us to 
CEVENT, A state system will change 
slates only in response to significant 
events. These can be hardware interrupts, 
inputs from sensors monitored by soft- 
ware polling loops, scheduled events acti- 
vated by a real-time clock, or pro- 
grammed software events. CEVENT 
offers seven functions to define and moni- 
tor these events in real time. 

CSCHED— prioritized real-time 
scheduler. One of the hallmarks of pro- 
cess control programming is that events 
sometimes occur faster than the computer 
can process them. One solution to this 
problem is to enter the procedures that 
might generate events into a prioritized 
queue and respond to them in order of 
entry and priority. Once started, a pro- 
cedure will execute through to completion 
unless interrupted by a higher priority 
procedure. 

CSCHED consists of an executive 
designed to manage such a queue. It also 
allows you to specify the time interval at 
which a procedure is to be run and how 
many times it is to be repeated. 

CSTATE— multiple state system 
control. CSTATE can be used to define 
and execute any number of state systems, 
limited only by the computer's available 
memory and processor speed. Execution 
of the simulated systems can be in 
response to events processed by 
CEVENT, execution of procedures under 
CSCHED, interrupts captured by CISR, 
or any other user-defined event. These 
systems are executed in parallel, priori- 
tized according to the order in which they 
were defined. 

The value of the CSHARP Realtime 
Toolkit is immeasurably enhanced by the 
availability of its source code. If you have 
a C compiler or cross compiler and an 
assembler for your target machine, you 
can run all ofCSHARP's tools on it. If the 
tools arc not to your liking, you arc free to 
enhance and modify them as you wish. 

Speaking of enhancements and mod- 
ifications, the actual source code for 
CSHARP is surprisingly simple. Rather 
than equate size with monetary value, 
however, you should consider that simple 
code is often elegant and fast running. 
CSHARP is not an exception. 

CSHARP relies heavily on the use of 
pointers to functions. This extremely 
powerful but often overlooked facility of 



C (even K&R's "The C Programming 

Language" discusses it almost in passing) 
allows CSHARP functions to pass user- 
defined procedures back and forth as eas- 
ily as if they were data. If your program- 
ming expertise has been developed under 
FORTRAN or BASIC, study of 
CSHARP*s source code should be 
rewardingly educational. 

CSHARP is currently available for the 
8088/86 and PDP/LSI-1 1 processor fami- 
lies, with Systems Guild working on sup- 
port for the 6809/68000 family. If your 
target machine is not among these, con- 
version of the assembly language support 
routines for CISR should not be an insur- 
mountable task— the PDP/LSI-1 1 source 
code covers two pages and the 8088/86, 
six pages. Free technical support, includ- 
ing assistance in porting to new machines, 
is available from Systems Guild for 90 
days after date of delivery. 

The C compilers used by Systems Guild 
were Computer Innovations' C86 and Lat- 
tice C (both large and small memory mod- 
els) under PC/MS-DOS and Whitesmiths' 
C under RT- 1 1 . The IBM PC version of 
CSHARP conies with sample interrupt 
handlers and assembly language drivers 
for the IBM timc-of-day clock (to drive 
CSCHED's executive) and both the IBM 
and Hercules color graphics boards. 

The manual for CSHARP is well- 
written and accurate, if somewhat terse. 
Some circle and arc generation functions 
in the source code for CGRAPH were not 
documented. Systems Guild's develop- 
ment of the various tools is ongoing, and 
what you receive is their latest work, 
including undocumented (in the manual) 
features. Work in progress at Systems 
Guild (which will likely be finished by the 
time you read this review) includes a 
UNIX-compatible I/O library that will be 
compatible with both real-time data acqui- 
sition and the CGRAPH module and 
drivers for popular data acquisition 
boards such as the Data Translation 
DT2801 and Metrabyte Dash8. 

One shortcoming of the CSCHED tool 
is that it docs not permit events to be 
queued for processing, only procedures 
that might generate events. While in many 
cases this is not significant, it sometimes 
is essential to have the ability to queue the 
events themselves. Systems Guild reports 
that it is currently working toward this 
goal. 

It would have been nice if Systems 
Guild could have provided a more soph- 
isticated means of converting a state dia- 
gram into a state system. At present, 
CSHARP provides the data structures for 
the states, execution scheduler queue, 
events and interrupts, and executives to 
run them — you must provide the rest. It is 
hoped that future versions will include a 
graphically oriented state diagram editor 
for automatic generation of state systems. 
Various directed graph algorithms that 
can validate state systems, eliminate non- 



determinism (possible transitions to two 
different states for the same event) and 
minimize their number of states. These 
could be potentially useful additions to 
CSHARP. 

Is the CSHARP Realtime Toolkit worth 
the initial source license cost of $600? If 
you are involved in real-time work and do 
your programming in C. the answer is 
most likely yes. CSHARP can save you 
many programming manhours — how far 
does $600 go when you consider your 
time as a professional? 

As a final comment on the CSHARP 
package, state systems arc not limited to 
describing process control tasks. They 
also appear in compiler design and lexical 
analysis for natural language processing. 
Their use in other areas of problem solv- 
ing appears to be underutilized. Software 
tools such as CSHARP may help us 
expand our horizons to include them in 
our repertoire of valued programming 
techniques. 

CGRAPH. Supplied with the CSHARP 
package is the graphics module 
CGRAPH. At first glance, CGRAPH 
appears to be yet another collection of 
those simple graphic functions published 
in home computer magazines. In common 
with its public domain brethern, it offers 
such mundane commands as dotal (dis- 
play a dot), lineto (draw a line), and draw- 
char (display a character). CGRAPH has 
no arc, circle, or ellipse generation rou- 
tines, no area fills or Crosshatch pattern 
functions. Nothing is exciting here, it 
would seem. 

First glances deceive. On closer 
inspection, there turns out to be much 
more than this. CGRAPH is device inde- 
pendent, supports multiple simultaneous 
windows on each physical display unit, 
and if your OS allows multitasking 
through intcrruptible and reentrant tasks. 
CGRAPH supports it. Written in C and 
supplied in source code form. CGRAPH 
provides the programmer with a flexible 
and powerful set of graphic programming 
tools. Costing only $49.95, it is a soft- 
ware package that should be looked at 
carefully by anyone who knows C and is 
interested in computer graphics. 

Graphic plotting commands. 
CGRAPH provides only seven graphic 
plotting functions, really a bare minimum 
for graphic programming. However, it is 
a fairly simple task (although not trivial) 
to extend these functions into a full set of 
graphic commands, including functions 
for drawing arcs, circles, ellipses, area 
fills and patterns. 

Virtual display initialization. As a 
basic minimum, CGRAPH requires only 
that the graphic display device be capable 
of plotting a point at a specified position 
on its display surface. The user must write 
a C-callable function (using either C or 
assembly language) that provides the nee- 
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essary interface to the hardware device. 
The function setpointQ is then used to 
declare a pointer (o this interface 
(referred to as a handler in the CGRAPH 
documentation). Whenever a CGRAPH 
function needs to plot a point, it simply 
passes the coordinates of the point to the 
user-defined handler. 

If the hardware device has built-in firm- 
ware lo plot a line given only its endpoints 
or a character at the current pen position 
given only the character, then the func- 
tions setlineO and setdtarf) can be used 
respectively to point to user-defined han- 
dlers for these features. If they arc not 
available, CGRAPH does the necessary 
calculations in software and plots the lines 
and characters point by point. 

Notice that you are not limited to one 
handler per program. Setpoint() , setlineO 
and setcharQ only point to the handlers. It 
is therefore a simple matter to call these 
functions with new handler names as 



arguments while the program is running 
to dynamically redefine the attributes of 
the virtual display device. 

The functions setchrsizeO , setgminQ 
and setorieiuQ are more or less self- 
explanatory. Unfortunately, CGRAPH 
does not support the drawing of charac- 
ters at any orientation, but only at right 
angles to the x and v axis. On the plus 
side, however, the internal character gen- 
erator of CGRAPH maintains a shape 
tabic in memory. Since the software is 
provided as source code, it is an easy task 
to redefine the characters in the table to 
suit your needs. With a bit of source code 
juggling, you can even maintain multiple 
character sets in your application 
programs. 

Virtual display definition. SetviewQ , 
setwindQ , clip() . remap!) and setstaQ 
form the virtual display definition com- 
mands. It is possible to have more than 
one virtual display device active at one 
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Realia COBOL Is written in COBOL. We offer you the 
tools we use ourselves: 

- Our FOLLOW-THE-SOURCE™ interactive symbolic 
debugger. Works with normal native code. 

- A speedy lull -5C rt>en editor I hat handles very largeiiles. 
. Mainframe IBM V5 COBOL compatibility. 

. Interfaces to Assembler and C. 

• No royally or run-lime fee. 

• No limit on program size, up to available memory. 

- In our new release, no need lo insert the product 
diskette when you're using a hard disk. 

Reaha COBOL costs S995. Qualified companies can 
try it for Iree. OH us. And ask about our other 
products, Spacemaker* and Termulator*. 
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time. You can send the output of one vir- 
tual display to one or more physical 
devices, and you can display the output of 
several virtual displays on one physical 
device. You can also dynamically redefine 
the virtual display attributes during pro- 
gram operation by calls with new argu- 
ments to the virtual device definition and 
initialization function. 

All of this magic is performed by stor- 
ing the attributes of each virtual display 
device in a memory-resident data struc- 
ture called a frame. Calls to the virtual 
display initialization functions arc used to 
modify this data structure, and the func- 
tion setstaQ can be used to set up a new 
frame and return a pointer to the previous 
one. By doing so, you in effect define 
multiple virtual display devices. 

CGRAPH can also be used with inter- 
rupts, with the interrupt service routine 
storing the current frame and activating 
another or creating a new one. Upon com- 
pletion of the interrupt task, the old frame 
can be restored. 

C compiler requirements. With all of 
the programming power that the pre- 
ceding implies, you might think that 
CGRAPH is a very complex and lengthy 
piece of software. Surprisingly, it is any- 
thing but complex. Even with the ^include 
and header files added on, CGRAPH. C 
takes only 12 pages to print out at 60 lines 
per page. 

CGRAPH is written in Manx Soft- 
ware's Aztec CII for CP/M-80 and Com- 
puter Innovations' C86 for MS-DOS. 
These implementations of C closely fol- 
low the standard UNIX version 7 C so that 
CGRAPH is transportable to virtually any 
operating system/hardware combination 
that supports a C compiler. A few 
machine dependencies in the handler 
functions are used to output data directly 
to the hardware, but these generally have 
their equivalent in C compilers written 
for other operating systems. 

Systems Guild is currently supplying 
CGRAPH in two formats: 8-in. SSSD 
disks for CP/M-80 and 5 V* -in. disks for 
MS-DOS. (A version written for the BD 
Software C compiler is also available.) 
However, inquiries are invited for other 
formats and operating systems, and even 
in the worst case, you can always buy the 
CP/M or MS-DOS version, print out the 
source code, and reenter it by hand into 
your system. Twelve pages of C code is 
not a horrendous amount of data entry for 
the benefits returned. 

Physical device interface require- 
ments. One minor problem with 
CGRAPH is that you have to write your 
own physical device interface modules 
(handlers). To do this you have to know 
the details of your graphic display 
device's command set and how to address 
them through cither assembly language or 
C code. Fortunately, Systems Guild has 
been thoughtful enough to provide exam- 
ple handlers (written in C) for the Epson 
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ADVANTAGE #8 

At Programmer's Connection we appreciate your business. We 
try to make it convenient for you to buy the programming tools 
you need. Some vendors penalize you for paying by credit card 
At Programmer's Connection there is no extra charge on 
any prepaid order, and that includes paying by credit card. 
Furthermore, your account is not charged until your order 
is shipped. At Programmer's Connection there is no 
extra charge for convenience. 

Discover the advantages of buying Irom Programmer's Connection: 

1. We offer the latest version of a product. 

2. Most popular products are in stock ready to be shipped. 

3. Receive same manufacturer's support as if buying direct. 

4. Experienced professional programmers are on staff. 

5. Choose from a large selection of the best software products available 

6. Knowledgeable and courteous sales staff. 

7. Significant discounts off of retail prices. 

8. No extra charge on prepaid orders, including major credit cards. 

9. Reasonable charges for shipping and handling. 
10. Toll free services from Canada and the U.S. 



NEW LISTINGS: 



List Ours 



Multi-Halo Graphics by Media Cybernetics . 250 199 

PANEL Screen Designer ver. 6,0 by Roundhill . 295 234 

PANEL 6.0 updates 50 50 

PasmBB Macro Assembler by Phoenix 295 259 

Pfinish Performance Analyzer by Phoenix . . 395 359 

Pmaker Program Development Mgr. by Phoenix 195 179 

RM/Fortranby Ryan-McFarland 595 439 

Turbo Pascal 3.0 by Borland 70 59 



C terp Complete C Interpreter 
Full K&R C interpreter/semi-compiler which ca 



access functions and externals compiled on vario 
C compilers. Comes with a powerful, built-in screen 
editor and a source-level debugger. 
List Price $300 Our Price $269 
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C LANGUAGE: 



Computer Innovations C-86 Compiler 395 299 

DeSmet C Compiler with Debugger 159 145 

Lattice C Compiler from Lattice 500 339 

Lattice C Compiler from Lifeboat 500 299 

Mark Williams C Compiler w/source Debugger . . 495 429 

Run/C Interpreter by Age of Reason 150 129 

Safe C Standalone Interpreter by Catalytix . 400 400 

Wizard C Compiler by Wizard Systems 450 399 

Xenix Development System by SCO 1350 1099 



Microsoft C Compiler version 3.0 

This entirely new version of Microsoft's C Compiler 

features extremety fast and compact code generation. 

small, medium and large memory models. Xenix 

compatibility, a linker and a librarian. 

List Price $395 Our Price $339 



OTHER LANGUAGES: 



8088 Assembler w/Z-80 Translator 2500 AD . 100 89 

APL-Plus/PC by STSC 595 469 

BetlerBASIC by Summit Software 200 169 

Modula-2/86 by Logitech 495 439 

Professional BASIC by Morgan Computing . 95 89 




Microsoft Macro-Assembler version 3.0 

New version of MASM-86 includes a 

symbolic debugger, object linker, librarian, cross 

reference utility, a MAKE facility and PC/AT support. 

List Price S150 Our Price $119 



J 




C UTILITIES: 



C Power Paks from Software Horizons Call Call 

C-Sprite Symbolic Debugger (or Lattice C 175 159 

c-tree by FairCom 395 359 

C Utility Library by Essential Software 149 119 

dBC dBase/C Interface by Lattice 250 219 

ESP for C by Bellesoft 349 279 

Graphic by Scientific Endeavors 250 209 

Greenleaf C Functions Library 185 139 

Greenleaf Comm Library 185 139 

Safe C Dynamic Profiler by Catalytix 150 150 

Safe C Runtime Analyzer by Catalytix 400 400 

Windows For C by Creative Solutions 195 139 



L 



Pre-C by Phoenix Software 

A complete lint-like utility that helps detect 

logic errors by searching for inconsistencies 

in functions and data types across multiple files. 

A powerful addition to anyone's C toolbox. 

List Price $395 Our Price $339 



OTHER PRODUCTS: 



APL2C by Decision Images interfaces apl to C 150 139 

Blaise Tools for Pascal Call Call 

Btrieve by SoftCraft 250 199 

Codesmith-86 Debugger by Visual Age 145 129 

Epsilon Text Editor by Lugaru 195 179 

FORTRAN Libraries by Alpha Comp. Serv. . , Call Call 

FORTRAN Scientific Subroutine Library . . , 175 159 

Periscope Debugger by Data Base Decisions 295 269 

Pfix-86 Plus by Phoenix 395 299 

Plink-86 Overlay Linker by Phoenix 395 299 

Pmate Macro Text Editor by Phoenix 225 159 

Polytron Products We Carry a Full Line Call Call 

Profiler by DWB Associates 125 89 

Screen Sculptor by Software Bottling 125 109 

XTC Text Editor by Wendin 99 89 

Xtrieve by SoftCraft 195 169 



Prices are subject to change without notice. ^^h 

Account is charged when order is shipped- ,^^h 

In Canada: 

1-800-336-1166 1-800-225-1 166 

Call for our Catalog 
Programmer's Connection 

136 Sunnyside Street 
Hartville, Ohio 44632 
(216) 877-3781 (In Ohio) 




"Programmers Serving Programmers" 

CIRCLE 23 ON READER SERVICE CARD 



MX-series and Okidata 92 dot matrix 
printers, generic Tektronix and Selenar 
plotters, the Heath/Zenith Z- 1 9 CRT 
terminal, and an oscilloscope with x-y 
digital/analog converters. 

Using these examples, I was able to 
write custom handlers for an Anadex 
DP-9500do! matrix printer and Micro- 
dynamics Corp. Microspritc S- 100 
graphics board in less than an hour. I do 
not consider myself to be an expert C pro- 
grammer, so even the novice should have 
few difficulties in writing custom 
handlers. 

Graphics programming demands that 
you have some means oTstoring images 
on disk files in a relatively compact form. 
This is especially true when the graphic 
display device is a dot-matrix printer; the 
image must be built up point by point in a 
disk file before being dumped to the 
printer, which usually can print only six to 
10 horizontal rows of dots at a time. 
CGRAPH does provide a set of functions 
for creating and reading such files. How- 
ever, no utilities are provided to edit these 



files or otherwise manipulate them. 

The 40 pages of documentation pro- 
vided are excellent. The program oper- 
ation and functions are clearly described, 
and what is not covered in the documen- 
tation is described with equal clarity in the 
disk files. Even the source code is well- 
written and commented where necessary, 
an unusual occurrence for C program list- 
ings. Several examples included as disk 
files demonstrate the use of the various 
functions and the capabilities of 
CGRAPH. 

On the negative side, I do have a few 
disappointments. Although CGRAPH has 
performed flawlessly for me, I wish that 
Systems Guild had included functions for 
some of the more complex graphic func- 
tions such as arc, circle and ellipse gener- 
ation, area fills and crosshatching. image 
rotation, and so forth. The algorithms for 
them are well-known and not at all diffi- 
cult to implement. 

I would also like to have seen even a 
rudimentary editor for the graphics disk 
files, but for less than $50 that may be 



asking too much. 

What you purchase with your money is 
a single user license. You can use and 
modify the source code as you see fit, but 
you can't resell or otherwise distribute the 
source or object code in any form without 
negotiating a secondary source license or 
object royalty license with Systems Guild. 
Systems Guild does not provide technical 
support for CGRAPH. However, given 
that the source code provided is so cleanly 
written and fully documented, this should 
not present any problem. 

Minor gripes aside, I have this to say 
about CGRAPH: I like it very much. It is 
inexpensive for what it offers, the soft- 
ware is in C source code so that you can 
customize it to your heart's content and 
thoroughly understand how it works, and 
the functions can be compiled along with 
your own applications software to provide 
custom graphics programming packages. 
I recommend it. 



By Ian Ashdown 



Plink86 



Hardware Requirements: 

One or more disk drives, 
128K of memory, MS-DOS 
2.0+orCP/M86 

Price: $395 

Available from: Phoenix Soft- 
ware, 1420 Providence Hwy., 
Suite 1 15, Norwood, Mass. 
02062 

Support: Updates {$35 , with 
manual $50) 

Plink86's advertised capabilities give a 
very favorable initial impression of the 
product. It can handle up to 4,095 over- 
lays stacked up to 32 levels deep. Overlay 
reorganization can be accomplished with- 
out recompilation. Based on those claims 
alone, Plink86 outstrips all its 
competition. 

The Plink86 package consists of a 
floppy, manual, and accompanying 
library manager PLIB. The floppy con- 
tains the linker itself (as .EXE or .CMD 
depending on the operating system), a 
checksum program (MS-DOS version 
only) to lest the integrity of the linker, an 
overlay library file thai contains run-time 
routines, and a number of test files. A few 
utilities are also included but are super- 
fluous to the package itself. 

The manual is the usual IBM three-ring 
affair, with no slipcover. It is divided into 



sections that include an explanation of a 
linker, Plink86's approach to the problem, 
installation and checkout, and a list of the 
commands in reference book format. A 
section of examples follows, with six 
appendices covering error messages, 
hints, and other points. The manual is not 
difficult to digest but is not quite up to the 
standards of larger corporations. It could 
certainly use a rewrite by a competent 
technical writer. 

Plink86 is a two-pass linker. During the 
first pass, modules are read, and Plink86 
determines which are to be loaded. The 
segment addresses are then assigned. 
During the second pass, the output file is 
created. While a two-pass system is 
slower than a single pass one, it does 
allow Plink86 to generate more efficient 
programs by having information about 
sizes and buffers predetermined. 

It may be assumed that Plink86 will 
take considerably more time than one- 
pass linkers to perform its tasks. This is 
true, but the differences arc not too 
important. Considering the power of 
Plink86 compared with MS-DOS LINK, 
the distinction is minor. 

Plink86 can accept instructions cither 
interactively or on one command line. 
The free-form approach of parsing is 
used, making the instructions independent 
of columns. Indentation can then be used 
to organize instructions. For large pro- 
grams, it is usually idea! to create a file of 
the required statements with a word pro- 
cessor and then have Plink86 read that 



file. The instruction file is read with a 
"@" in front of the instruction file's name 
(for example, PLINK86 ©INSTRUCT). 

Plink86's commands cover almost 
every possibility of manipulation one 
could require from a linker. A simple file 
can be linked with the command PLINK86 
FI FILENAME . The FI is an abbreviation 
of the FILE command, which gives the 
name(s) of the filc(s) to be linked. Any 
Plink86 command can be abbreviated to a 
short form as long as it is unambiguous. 

After processing, Plink86 issues a mes- 
sage that gives the executable files' names 
and the size memory required when run. 
Ouput files are named similarly to the 
input file, unless specified otherwise with 
an COTror command. Thus: 

PLINK86 0UTPUTTEST2.EXE 
FILE TESTl.OBJ " 

will read the object file TEST 1 and create 
thcfileTEST2.EXE. Libraries to be 

searched for routines arc identified with 
the LIBRARY command. 

Using these commands to link a file 
TEXT. OBJ with routines in TEST- 
LIB. LIB, the instructions can be given as 
either: 

PLINK86 OUTTEST.EXE FI TEST.OBJ 
LIBTESTLIB.LIB 
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or using the formatted approach: 

PLINK86@TEST 

where the file TEST contains the 
following: 

OUTTEST.EXE 
Fl TEST.OBJ 
LIB TESTLIB.LIB. 

The hitter approach can be seen much 
more clearly, and the formatted instruc- 
tions are readily understood. When com- 
mand sequences approach the dozens, the 
formatted approach becomes almost man- 
datory for comprehension. Instructions 
can be appended after the formatted input 
approach in case an option is required that 
is not in the command file. 

MS-DOS directory paths arc supported 
by Plink86, and the path to be searched 
for files can be specified. An error mes- 
sage is generated if a file cannot be 
located. 

The most important part of Plink86 
remains the linking of modules in some 
order. Plink86 will follow a canonic 
program-data segment order, as given in 
the input commands, unless overridden by 
a specific CLASS command. (A class 
refers to the type of segment— data, pro- 
gram, etc.) 

This situation can be illustrated by con- 
sidering a simple program that contains 
no overlays. A single section is involved 
with all segments in their canonic order in 
the file. Plink86 will normally assign the 
segments in the same order that they 
appear in the file. Each segment will be 
allocated within memory in the order they 
are encountered, with program segments 
taking precedence over data segments. 

A new section of a program can be con- 
structed by the linker using the SECTION 
command. Following this instruction, any 
modules found by subsequent FILE or 
LIBRARY/SEARCH commands will be 
loaded into that section. The section can 
be named for use with the MAP command. 
Thus the series: 

SECTION = SEC1 
FILETEST1,TEST2 
SECTION = SEC2 
FILETEST3 

will create two sections, SEC1 and SEC2. 
Segments from modules in the input files 
TEST 1 and TEST2 will be assigned to 
section SEC 1. and segments from mod- 
ules in the file TEST3 will be assigned to 
section SEC2. A section command is thus 
required by all linking instructions, as the 
linker has to assign the modules to some- 
thing. Plink86 will create a SECTIONby 
itself at the start of the commands if the 
instruction is not given. 

As mentioned earlier, the canonic 



ordering of the segments can be over- 
ridden with the CLASS command. This 
causes all segments in the class to be 
moved to the current section. A similar 
command is MODULE, which will assign 
all segments from the specified module to 
the current section. This is usually used to 
pull modules from a library. A final ver- 
sion is GROUP . which moves all seg- 
ments within a group to the current 
section. 

All these options may appear confusing 
at first glance, but essentially they are 
used to move varying sized blocks from 
one place to another in the linking pro- 
cess. They follow a hierarchy of CLASS, 
MODULE, and GROUP, with CLASS hav- 
ing the highest priority. These are then 
foTlowcd by the FILE and LIBRARY com- 
mands. (The instructions are only used 
when the ordering of the segments is to be 
different than encountered in the normal 
canonic system Plink86 uses.) 

Overlaying sections is handled by 
another set of commands. An overlay area 
is a group of sections that will share the 
same address space. The overlay area is 
created with a BEGINAREA command and 
ended with an ENDAREA command. Sec- 
tions that are defined (created) between 
these instructions then become overlays. 
The addresses of the overlays are all 
assigned by the linker. 

Several overlay areas can be created by 
using multiple BEGINAREA and 
ENDAREA commands. This is required 
with nesting applications. When nesting is 
used, Plink86 requires that the "parents" 
of the called overlay be in memory also. 
Otherwise a crash can occur. 

Plink86 allows an additional feature 
that may be useful in some applications. 
Overlays (or groups of overlays) can be 
assigned to separate files. This assign- 
ment may be required if several floppies 
arc involved. Then the overlay manager 
can prompt for the required disk with the 
necessary filc(s) on it. Also, modularly 
programmed applications with different 
levels of support can be used as a market- 
ing tool. (A graphics routine available as 
an optional extra can be sold as an overlay 
and called if available.) 

Several considerations may be neces- 
sary, depending on the source code's ori- 
gin, for Plink86 to use them properly. 
Any such considerations are discussed in 
detail in the manual. 

For a programmer, one important 
aspect of the Plink86 package enhances it. 
The overlay loader supplied with Plink86 
can be distributed with no license fee in 
any application that used Plink86. Plus 
the loader can be customized and distrib- 
uted by the programmer at will. An 
appendix details the process of 
customization. 
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Use C-terp 

the complete C interpreter 

This is the product you've been 
waiting (and waiting) for! 

Increase your productivity and avoid 
agonizing waits. Get instant feedback of 
your C programs for debugging and rapid 
prototyping. Then use your compiler for 
what it does best.. .compiling efficient code 
...slowly. 

C-terp Features 

• Full K&R C (no compromises) 

• Complete built-in screen editor- 
no half-way house, this editor has every- 
thing you need such as multi-files, inter-file 
move and copy, global searching, auto- 
indent, tab control, and much more. 

• Fast- Linking and semi-compilation are 
breath-takingly fast. (From edit to run 
completion in a fraction of a second for 
small programs.) 

• Convenient-Compiling and running are 
only a key-stroke or two away. Errors 
direct you back to the editor with the 
cursor set to the trouble spot. 

• Object Module Support - Access functions 
and externals in object modules produced 
by C86 or Lattice C or assembly language. 
Utilize your existing libraries unchanged! 

• Complete Multiple Module Support- 
Instant global searches, auto-compile 
everything thaf s changed, etc. 

• Many more features including batch mode, 
8067 support and symbolic debugging. 

• Runs on IBM PC, DOS 2.x, 192K and up. 

• Price: $300.00 (Demo $45.00) MC, VISA 

Price a! demo tnduda. dot umentation j/id ■shipping 
within US PA residents add 6% w/es fax 
Specify C#6 or Lattice version 



© 



mm, 

3207 Hogarth Lane • Collegeviile, PA 19426 
(215)584-4261 

'Trademarks: C86 (Computer Innovattomllaxticc 
{lattice inc.}, IBM fISM Corp ),Gtefp (Qmpef Software) 
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The library manager supplied by Phoe- 
nix as part of the package makes standard 
libraries of modules easy to create and 
manipulate. A full set of commands for 
merging, creating, updating, adding, and 
deleting modules is available. 

Overall. Plink86 is unique in that it per- 
forms a job that no other program does. It 
allows a programmer a seemingly endless 
amount of power to manipulate code into 
various configurations and determine 
optimum forms. The availability of the 



MAP function aids debugging enor- 
mously, especially on large programs 
where one can never be quite sure where a 
crash occurred. 

Phoenix will support most compilers, 
including Microsoft C, Microsoft FOR- 
TRAN, Microsoft Pascal. Microsoft 
BASIC, Microsoft COBOL, Microsoft 
Assembler. Lattice C, Computer Inno- 
vations' C86. mbp COBOL, Mark Wil- 
liams' C. RM FORTRAN, and IBM FOR- 
TRAN. The company has a policy of 



adapting Plink86 to each new compiler as 
it becomes available, and some compilers 
not on the "approved" list work with no 
problems at all. Phoenix's support of new 
versions will keep Plink86 current. 

After using Plink86 a few times, it 
became very obvious that this was a prod- 
uct with no equal on the market. Plink86 
should be a mandatory part of an applica- 
tion programmer's arsenal. 

By Tim Parker 



Pfix86/ Pfix86 Plus 



Hardware required: Two disk 
drives, 128K of memory, MS- 
DOS 2.0+, Plink86 or MS- 
Link 

Price: $195 for Pfix86, $395 
for Pfix86 Plus 

Available from: Phoenix Soft- 
ware, 1420 Providence Hwy. 
Suite 1 1 5, Norwood, Mass, 
02062 

Support: Updates ($35, with 
manual $50) 

Phoenix Software's entry in the com- 
petitive 8086 debugging software market 
is Pfix86 and its slightly enhanced Pfix86 
Plus. Pfix86 is a multiple window 
debugger, allowing several breakpoint 
options, in-line assembly, data for- 
matting, trap capabilities, and memory/ 
register examination and modification. 
Pfi.\86 Plus combines with Phoenix's 
powerful Plink86 overlay linker to offer 
extra features foroverlaycd programs. 

The Pfix86 package consists of a floppy 
containing the debugger, some sample 
files for demonstration purposes, and a 
standard IBM-sized manual laid out simi- 
larly to Plink86"s manual. Unfortunately, 
it also had most of the same drawbacks as 
Plink86's manual. 1 found that I learned 
more about Pfix86's commands by read- 
ing through the demonstration than I did 
reading the manual. 

Pfix86 uses a set of windows on the 
screen, with the window areas assigned to 
different functions: stack, CPU, file, 
breakpoints, data, and program. Only one 
of these areas is actually usable at one 
time, and they are selected by use of a 
function key or a command. The display 
is well thought-out, with each window 
outlined by a double line. 

Once inside a window, the cursor 
location is shown by reverse video. The 
cursor can be moved with the IBM cursor 



keys. The Home, End, Pg Up and Pg Dn 
keys work in the windows (except for the 
CPU area). 

Invoking commands in Pfix86 is easy. 
The structure of the program is setup so 
that simple mnemonics help do all the 
major commands. Most commands arc 
accessible through a menu at the top of the 
screen. (Pfix86 reserves two lines at the 
top of the display for status messages, 
error messages, and the command menu.) 

Menu commands are usually prefixed 
with the Fl function key. This produces a 
list of options at the lop of the screen, in 
full word form. Typing the first letter of 
the required command invokes it. Alter- 
natively, the desired command can be 
highlighted by moving the cursor to it (the 
active command appears in reverse 
video), and pressing return. Commands 
are not case dependent. After entering a 
command, that command's further sub- 
menu appears, and so on, until the entire 
command is completed with all required 
arguments. This approach makes it easy 
to use Pl'ix86, and the manual needs to be 
referred to only for more elaborate help. 

Commands available cover the entire 
range of useful debugging features. 
Breakpoints can be set at any time in the 
code (except in ROM. of course), with up 
to 10 permanent and 10 temporary break- 
points active at one time. Breakpoints that 
are set (or disabled) are listed in the 
breakpoint window at the foot of the dis- 
play screen and appear in the code in one 
of two ways. 

Temporary breakpoints arc easily 
enabled by pressing the F 10 key when the 
cursor is on the line to be marked. An 
asterisk to the right of the instruction 
address in the program window indicates 
the breakpoint is set. If for some reason 
the breakpoint cannot be implemented, an 
error message appears. 

Permanent breakpoints appear in the 
program window in half intensity. The 
manual claims they will be underlined, 
but that may be dependent on the monitor 



and configuration file. As the half 
intensity was easier to spot than an under- 
lined statement, it was left as is. 

Breakpoints can be cleared one at a 
time or all at once using an initialize com- 
mand. They can be enabled or disabled 
singly or in a group. 

In practice, the breakpoint facility was 
easy to use. The menu approach made it 
simple to Hip the breakpoints on and off at 
will to test various code segments, and the 
easily set. temporary breakpoint facility 
was invaluable. The location of break- 
points was obvious in the program win- 
dow by the half intensity, and the break- 
point window's list of all breakpoints 
helped enormously in keeping tabs on 
large programs. 

Breakpoints are one of the most 
important features of any debugger, and 
Pfix86's breakpoint capabilities are 
superb. Most programmers will find 
themselves relying on the easily activated, 
temporary breakpoints quite a bit. 

A number of disk functions arc also 
available in Pfix86's command set. Natu- 
rally, programs can be loaded from disk, 
and data can be read and written to a file 
with a specified offset and file name. 
Absolute disk sectors can be read and 
written to memory and back to disk. 

An evaluation feature allows an expres- 
sion to be run through the arithmetic 
expression parser and the result dis- 
played. The evaluation feature is useful 
for determining offsets and memory 
location in structured data files. Evalu- 
ation is also used for conditional break- 
points. The operators used in the evalu- 
ation function are the same as those used 
in the C language, with the same pre- 
cedence rules. Using indirect addressing 
or specific memory addresses and the 
usual mnemonics for the 8086/8088 regis- 
ters, expressions such as 1256/ < (AX + 
BX - (5/9)) and [256} = = GLOBALSYM 
can be used as expressions in any location 
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Creators of 

COMPUTER LANGUAGE 
Sponsor the C Expert Forum 




$8% 



Never before have so many leaders in the C pro- 
gramming field gathered for one event. The C Seminar/ 
Workshop will be an exciting forum on the latest technical 
innovations and C language developments. Best of all, you'll experience a practical, hands- 
on approach in small workshop sessions. All this in the beautiful autumn foliage of New 
England, just four blocks from Harvard Yard. The C Seminar/Workshop is brought to you by 
the publishers of COMPUTER LANGUAGE. 

The cost for this comprehensive 2V2 day event is only $695. Sign up by June 30th and 
receive a $100 early bird discount. 



CURRICULUM 

Speakers 



Jim Brodie, ANSI C committee chairman: Overview of the ANSI Standardization Effort 

P.J. Plauger, author, ANSI C committee secretary; Programming Style and C 

Larry Rosier, ANSI C language chairman: Language Standardization Issues 

Tom Plum, author: Efficiency of C Programs 

Heinz Lycklama, /usr/group UNIX chairman: UNIX Perspective on C 

Leor Zolman , compiler writer: Porting C Programs between Operating Systems 

Robert Ward, C User s Group coordinator: Structured Methods of Debugging C 



Workshops 

(Subject to change 

based on 

ovailability) 



Seminar participants will be able to choose four from this list: 



Debugging Techniques 

Interpreters in a Development Environment 

Programming for Portability 

Efficient Code Generation 

Cross Compilers 

Network Data Base Theory and C 

Object-File Formats for UNIX Systems 

Philosophy and Methodology of Benchmarks 



ANSI Standards: Questions & Answers 
Code Readability and Organization 
Asynchronous Communications 
Writing Extensions to C 
C / UNIX System Subroutine Interfaces 
Porting C between CP/M, MS-DOS, and 
UNIX 



C Seminar/Workshop Registration Form 



Please enroll me in the C Seminar: 

D Early Bird $595 (pay by 6/30/85) 
D Single $695 

D Multiple 

(3 or more enrollments get $100 discount) 

D I do not wish to enroll at this time but 
please send me more information. 

Method of Payment: 

□ Check Enclosed 

□ Bill My Company 

Make check payable to: 
C.L. Publications Inc. 



Name & title. 
Name & title . 
Name & title. 

Company 

Address 



City, State, Zip 
Phone 



DA85 



COMPUTER LANGUAGE Seminar 
131 Townsend St. 
San Francisco, Calif. 94107 
(415) 957-9353 
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where a data byte or word is normally 
used. 

Memory manipulation can be accom- 
plished with four commands. Memory 
can be cleared at a specified address for a 
similarly specified number of bytes. 
These are all set to zero. A set command 
allows a location or range of locations to 
be set to a list of byies. The starting 
address, number of bytes to set, and the 
list to be placed there are specified in 
either hex or character string format. If 



the list to be set is shorter than the range 
specified, it is repeated. Assembly lan- 
guage mnemonic instructions can be 
entered, if enclosed in parentheses. 

A sequence of instructions for actually 
running the program are necessary. An 
execute instruction with any command 
line arguments runs the program with a 
blanked screen, then after termination, 
prompts the user to hit any key to reenter 
the Pfix86 screen. This allows normal 
operation of DOS functions and programs 
from within Pfix86. 




A FULL C 

COMPILER 

FOR 



$4995 



The Ecoioft Eco-C88 compiler for the 3068 and MSDOS is going to iel a new 
standard lor price and performance. Consider the evidence: 



Compter 


ECO-C8S 


Lotto (J) 


C56 11) 


Seive 


13 


St 


13 


fib 


44 


58 


44 


Oeref 


13 


13 


- 


Matrix 


21 


29 


27 


Price 


•49.95 


'500.00 


>3°5.0<j 



(1) Computer Language, Feb,, 1V35. pp.73-102. Reprinted by permission. 
The Eco-C88 compiler is full K&R C campler that supports all dala types and 
operators (except bif fields). Now look at the other features we offer: 

* 8087 co-processor support uiing a single library, If you install on 8087 
loler, the software will use it without having to recompile. 

* A robusl standard library with aver 150 functions, induing trans- 
cendentals, coior, and others. 

* Q3J output for linking with the MSDQ5 linker (UNK). 

* Error messages in English - no cryptic numbers to look up h A real plus 
especially If you're just getting started with C 

* Easy-ro-read and complete user's manual. 

* Works with all IBM and compatibles running M5D0S 2.0 (or later). 

* Plus many other features. 

For S10.00 more, we will include fhe source code for the C library functions 
(excluding tronscendentoh). For an additional S15.00, we will include our 
ISAM file handler in OBJ format [as published in the C Programmer's 
Library, Que Publishing!, The discount prices for the library source and ISAM 
only apply at the time the compiler is purchased. Please odd 54.00 to cover 
postage and handling. To order, coll or write: 

Ecosoft Inc. 
6413 N. College Avenue 
Indianapolis, IN 46220 
icoaoFT^c. (317) 255-6476 

Eco-C [Etaiohl, MS0OS (Mitmiaft). IW1X (Bell LobO. CP/M [Digital R«eorch), Z80 (ZJIt>&), 608* 6087. 8OS8 Uriel) 
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r FAST SCREEN 
OUTPUT FOR 
.TURBO PASCAL 



FASTSCREEN™ 
is a set of inline assembler and Pascal 
procedures for Turbo Pascal users, 

• display an entire screen or window, iilmosi 
instantly 

• Process mulli-fieEd input screen* thai (juc 
your user lull cursor control 

■ Sample program uses Conv-ay\ I, IKK in 
illmlrute USC of procedures 

• All vourcc code included 

• IBM PC XT AT and true conipahhlrs 



2995 



V'A residents 
add J r r sales la 



TECHNISOFT 

1710 All if J Street, Suite 37 

Charlottesville, VA 22901 

(804) 979-6464 

Turho Paiial is .1 tcnistcrtd Trademark 
of Borland International 
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Thunder Software 



• The THUNDER C Compiler - Operates, under ihu 
APPLE Pascal LI or 1.2operating system or ProDOS. 
Create fast native 6502 programs to run as stand alom? 
programs ot assubroutines to Pascal pro-ams A major 
subset of the C defined by K & R- Includes a users guide, 
newsletters. Macro preprocessor, runs on APPLE )[. 
][ + . //c. //c. Source code for libraries is included. 
Only $49.95 

• ASSYST The Assembler Sysiem * A complete 
6502 editor/ assembler and lister forAPPLE DOS 3,:i 
or ProDOS. Menu driven, excellent terror trapping, us- 
ers guide, demo programs, source code far allpro- 
grams! Great for beginners. Only $29.95 

• THUNDER XKEF- Across reference utility for AP 
PLE Pascal l.J XREF generates cross references for 
each procedure. Only $19.95 

• PDL- Pascal Development Library SCREEMO. DIS- 
KIO. CONVERSIONS, GRAPHICS, PLOT, MISC 
Units for Pascal programming A must. Only $29.95 

• PKOPLOT - Easy and powerful graphing package for 
plotting data, Only $24.95 

■ LINKIT - Structured APPLESOFT processor No 
more tine numbers. Only $39.95 



POB 31501 Houston Tx. 77231 
713-728-5501 - 
Visa, Mastercard, COD, checks accepted 
Add $3.00 forP&H 
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The analogous execution command Co 
allows the program to be run within 
Pfix86, starting at a specified address. A 
proceed command allows tracing and 
skipping of loops. Single instruction exe- 
cution is followed, with some commands 
(such as LOOP, JCXZ, CALL, INT and 
some REP) skipped. This avoids iterative 
routines. The Go command can be acti- 
vated either from a menu or a function 
key. A restart command starts the pro- 
gram execution at the current instruction 
pointer and can also be activated by a 
function key. 

For debugging programs that access the 
screen, the Pfix86 package allows screens 
to be saved for later reference from the 
program. Then the Pfix86 window screen 
and the application program can be tog- 
gled between for comparison. Naturally, 
for graphic routines this is almost 
mandatory. 

Neither versions of Pfix86 support the 
8087 chip. This may be forthcoming from 
Phoenix, though, considering the rela- 
tively fast speed the company has shown 
with updates for its Plink86 linker. 

At SI 95 for Pfix86 and S395 for Pfix86 
Plus, they are among the higher priced 
debuggers (especially the Pfix86 Plus ver- 
sion). While symbols make debugging 
that much easier, unless a debugger was 
used on a regular schedule, consumers 
may balk at the enhanced version. 

In summary, (he Pfix86 package stacks 
up well against the other software 
debuggers on the market. The windows 
were pleasing to use and presented the 
best display of any debugger yet used by 
this reviewer. The need for multiple key- 
strokes to achieve a function (instead of 
one or two key sequences with most other 
debuggers) tended to be frustrating after a 
few hours of work, but the mnemonically 
organized structure means that control 
key sequences don't have to be 
memorized. 

For the casual assembly language user, 
this product is probably ideal . For the reg- 
ular debugger user, Pfix86 has to be con- 
sidered among the best in its class. If 
Phoenix can follow with 8087 support and 
a rewritten manual, then Pfix86 may well 
garner the top spot. 

By Tim Parker 




PROFESSIONAL PROGRAMMING 
ENU I RONMENT 

BENDORF 

ASSOCIATES 

&ee& s. main 

P.O. BOX 5910 
R05UELL, NM 

BBzai 

505 347- 5701 
UISA/MSSTERCARD 



WORKS WITH 
BASICA 
INTERPRETER 
COMP1 LER 

FULL ERROR 
LOGCI NC 

PROGRAM 
LISTER 



LABELED 

PROCEDURES 

MACROS 

SUB-ROUTINES 

LIBRARIES 

$49.951 



MiNNBSOlA 




-v 
ONLY m.% 

This exceptional language will amaze you with its 
versatility. Compatible with main-frame 
SN0B0L4, use it at work and home. Perform those 
complicated programming jobs and prototype your 
exotic ideas quicfcly. This robust implementation 
supports large memory model, 8Q87[if float ae- 
sired). 32 bit integers. 32K strings. Includes 6D 
page reference guide and sample programs includ- 
ing ELIZA. You can also get Gnswold's et al defini- 
tive "green" book or even the source code. Needs 
IBM PC or 8088/86, &128K, IBM or MS DOS. 

Guide + 5V4" SSDD diskette $44 B 5 

Guide - diskette + 'green' bonk £59 95 

"Green" book only $24.95 

Source code and license S50D00 

Prices postpaid. In NY state add sales tax. 

© 1914)271-5855 3 gg 

BERSTIS INTERNATIONAL. 

P.O. Box 441 

MILLWOOD, NY 1054B USA 



/H\ TTJj @ 

IQQ' LTliyperon <$2/oftware 

Specializing in innovative programming 
tools. 

■ Complete documentation and 
C-source provided (presently DOS 
only). 

■ Reasonable prices 

■ High quality and good 
performs nce. 

Producls currently available: 

C Preprocessor Features include 

variables and expressions, loops. 

and full macros. Price — S39.95. 
General purpose editor Line oriented 

commands with a screen oriented 

submode Command window Price 

- $29,95 
Order from; 

HYPERON SOFTWARE 

P.O. Box 3349 
Costa Mesa. CA 92628 
Enclose check or noney order California 
residents add 6% 
2532 Orange Ave.. Cosla Mesa. CA 
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& Advanced 
Trace86™ 



Symbolic Debugger d Assembler Combo 



• Full-screen irace wJlh single sleeping; 
Even bacfcslepplng! 

• Wrile & Edil COM &. EXE programs 

• Conditional breakpoints (programmable) 

■ Switch between Trace and output screen; 
Or set up two monitors 

" SQo7, B01B6.8G2B6, SQ2B7 support 

■ Write labels £ comments on code 

• Polish hexadecimal calculator 

■ and more Priced at $175.00 

To order or request more information contact: 

lyt Morgan Computing Co., Inc. 

J^l B007527<DOQ9 

P.O Box 112730, Dallas, TX 75011 
(214] 245-4763 




Users 7 
Group 



Over 40 volumes of public 
domain software including: 

• compilers 

• editors 

• text formatters 

• communications 

packages 

• many UNIX-like tools 

Write or call for more details 
The C Users' Group 

415 E. Euclid* Box 97 

McPherson, KS 67460 

13161241-1065 



OPT-TECH SORT 7 



SORT/MERGE program for 
IBM-PC, XT & AT 

Now also sorts dBASE II files! 

• Written in assembly language tar high perfcrmmce 
Example 4,000 records ol 128 bytes sorted to give 

key & pointer tile in 30 seconds COMPARE! 

• Sort ascending or descending on up to nine fields 

• Ten input files may be sorted or merged at one time 

• Supports many tile structures & data types 

■ Filesue limited only by your disk space 

• Output file can be full records, keys or pointers 

• Can be run from keyboard or as a batch command 

• Can be called as a subroutine to many languages 

• Easy to use — Fully documented 

■ S9S - VISA. M/C Check, Money Order, COD. or PO 
Quantity discounts and OEM licensing available 

To order or to receive additional information 

write or call: 
OPT-TECH DATA PROCESSING 

P.O. Box 2167 Humble, Texas 77347 
(713) 454-7428 

Requires DOS, 64K and One Disk Drive 
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FoxBASE™ 

Interpreter/Compiler 



I dBASE II- source compatible 

I Runs 3-20 times faster than 

dBASE II 
I B087 coprocessor support 
I 14 digit precision 
I Up to 48 fields per record 
I Full type-ahead capabilities 
I Provides compact object code 

and program security 
I Twice as many memory variables 

as dBASE II 



FOX SOFTWARE INC. 

13330 Bishop Rood. P.O. Box 269, 
Bowling Green. OH 43402 
41 9.354-398 1 




estern wares 303-327-4398 

SciC • Norwood COfllJli 
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FORTRAN 

PROGRAMMERS 

Discover why 

vou should be using 

F77L 

the complete implementation 

of the ANSI FORTRAN 77 
Standard for the IBM PC and 

compatibles. 

If you are serious about your 

FORTRAN programming, you 

should be using F77L. 

$477 

|X5~ J Lahey Computer 
^M~] Systems, Inc. 

31244 Palos Yerdes Drive West, Suite 243 
Raruho Palos Verde;. California 90274 

(213) 541-1200 

Servjng the FORTRAN community 

since 7969 
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>iztec The Most Powerful C 



for the IBM AT • MACINTOSH • MS DOS • CP/M-80 • ROM APPLICATIONS 
IBM PC/XT • APPLE // • CP/M-86 • TR5D0S • CROSS DEVELOPMENT " 



Why Professionals Choose Azlec C 
AZTEC C compilers generate fast, compacl 
code. AZTEC C is a sophisticated development 
system with assemblers, debuggers, linkers, 
editors, utilities and extensive run time libraries. 
AZTEC C is documented in detail. AZTEC C is 
the most accurate and portable implementation 
of C for microcomputers. AZTEC C supports 
specialized professional needs such as cross 
development and ROM code development, 
MANX provides qualified technical support, 

AZTEC C86/PRO 
— for the IBM AT and PC/XT 

AZTEC C86/PRO provides the power, portabili- 
ty, and professional features you need to 
develop sophisticated software for PC DOS, MS 
DOS AND CP/M-86 based microsystems, The 
system also supports the generation of ROM 
based software for 8088/8086, 80186. and 80286 
processors. Options exist to cross develop ROM 
code for 65xx, 8080, 8085, and Z80 processors. 
Cross development systems are also available 
that target most micro computers. Call for infor- 
mation on AZTEC C86/PRO support for XENIX 
and TOPVIEW. 



POWERFUL - AZTEC C86/PRO 3.2 outper- 
forms Lattice 2.1 on the OHRYSTONE 
benchmark 2 to 1 for speed {17.8 sees vs 37.1) 
while using 65% less memory (5.8k vs 14k). The 
AZTEC C86/PRO system also compiles in 10% 
to 60% less time and supports fast, high volume 
I/O. 



PORTABLE — MANX Software Systems pro- 
vides real portability with a family of compatible 
AZTEC C software development systems for PC 
DOS, MS DOS, CP/M-86, Macintosh, CP/M-80. 
APPLE // + , lie, and He (NIBBLE - 4 apple rating). 
TRSDOS (80-MICRO - 5 star rating), and Commo- 
dore C64 (the C64 system is only available as a 
cross compiler - call for details). AZTEC 
C86/PRO is compatible with UNIX and XENIX. 



PROFESSIONAL — For professional features 
AZTEC C86/PRO is unparalleled. 

• Full C Compiler (80B8J8086 ■ 80186 ■ 80286) 

• Macro Assembler for B088/8086IB0186JB0206 

• Linkage Editor with ROM support and overlays 

• Run Time Libraries ■ object libraries + source 
DOS 1.x; DOS 2.x; DOS 3.x; screen I/O; Graphics: 
UNIX I/O; STRING; simulated float; 6087 support; 
MATH; ROM; CP/M-86 

• Selection of 80B8/8086, 80186. or B0266 code genera- 
tion to guarantee best choice for pertormance and 
compatibility 



• Utility to convert AZTEC object code or libraries to 
Microsoft format, [Assembly + conversion lakes 
less than hall the time as Microsoft's MASM to pro- 
duce MS objectl 

• Large memory models and sophisticated memory 
management 

■ Support products for graphics, DB, Screen, & ... 

» ROMablecode + ROM support + separate code and 
data + INTEL Hex Converter 

• Symbolic Debugger & Other Utilities 

• Full Screen Editor (like Vi) 

• CROSS Compilers are available to APPLE II, Macin- 
tosh, CP/MB0. TRSDOS, COMMODORE C64, and 
ROM based 65xx. and 8080/8085280 

■ Detailed Documentation 

AZTEC C86/PRO-AT $500 

(configured for IBM AT - options for 8088/6086) 

AZTEC C86/PRO-PC/XT $500 

(configured for IBM PC/XT - options lor 80186/80286) 

AZTEC C86/BAS includes C compiler [small model only), 
8086 MACRO assembler, overlay linker. UNIX, MATH, 
SCREEN, and GRAPHICS libraries, debugger, and 
editor. 

AZTEC CB6/BAS 1199 

AZTEC C86/BAS (CP/M-86) S199 

AZTEC CB6/BAS [DOS + CP/M-86) S299 

UPGRADE to AZTEC C66/PRO $310 

CTREE Database with source $399 

C-TREE Database (object) $149 

CROSS COMPILERS 
Cross Compilers lor ROM. MS DOS. PC DOS. or CPJM-86 
applications. 

VAX - > 8086/SOxxx cross $5000 

PDP-11 ->6086/80xxx cross $2000 

Cross Compilers with PC DOS or CP/M-86 hosts areS7S0 
for the tirst target and $500 lor each additional target. 
Targets: 65xx: CP/M-80: C64; 8080/8085/Z80; Macintosh; 
TRSDOS; 8086(8068/80186(80286; APPLE II. 



AZTEC C68K 
— for the Macintosh 

For power, portability, and professional features 
AZTEC C68K-C is the finest C software deveiopment 
system available tor the Macintosh, 

The AZTEC C68Kc system includes a 6B000 macro 
assembler, a linkage editor, a source editor, a mouse 
based editor, a SHELL development environment, a 
library of UNIX I/O and utility routines, full access and 
support of the Macintosh TOOLBOX routines, debug- 
ging aides, utilities, make, diff, grep, TTY simulator with 
upload & download [source supplied), a RAM disk |for 
512K Mac), a resource maker, and a no royalty license 
agreement. Programming examples ar included. (Over 
600 pages of documentation), 

AZTEC C68K-C requires a 128K Macintosh, 
and two disk drives (frugal developers can make 
do with one drive). AZTEC C68K supports the 
512K Macintosh and hard disks. 

AZTEC C68K.C (commercial system) $500 

AZTEC C63K-p (personal system) $199 

AZTEC C68K-P to AZTEC C68K-C upgrade $310 



Mac C-tree database . . . , , , . , , ,$149 

Mac C-tree database with source $399 

Lisa Kit (Pascal 10 AZTEC C68k object converter) . .$ 99 



AZTEC C65 

— tor the APPLE // 

"...The AZTEC C-system is one of the finest software 

packages I have seen..." NIBBLE review. July 1984, 

The only commercial C development system available 
that runs native on the APPLE II + , lie, and lie, the 
AZTEC C65 development system includes a full floating 
point C compiler compatible with UNIX C and other 
MANX AZTEC C compilers, a 6502 relocating assem- 
bler, a linkage editor, a library utility, a SHELL develop- 
ment environment, a full screen editor. UNIX I/O and 
utility subroutines, simple graphics, and screen func- 
tions. 

AZTEC C65 (Apple DOS 3.3) $199 

AZTEC C65/PRO (Apple DOS + ProDos) S350 

(call for availability) 



AZTEC C ll/PRO 
— lor cp/M.eo 

The first member ot the AZTEC C lamily was the 
CPiM-60 AZTEC C compiler. It is "the standard" com- 
piler for development on CP/M-80. The system includes 
the AZTEC CMC compiler, an BD80 assembler, a linkage 
editor, an abject librarian, a full library of UNIX I/O and 
utility routines, CPfM-80 run time roulines, the SMALL 
library (creates modules less than 3K in size), the last 
linker for reduced development limes, the ROM library, 
RMAC and M80 support, library source, support for 
DRIs S1D/ZSID symbolic debugger, and more. 

AZTEC C HJPRO $349 

AZTEC CI l/BAS -$199 

CTREE Database with source $399 

CTREE Database in AZTEC object lorm $149 



AZTEC C80 

— lor TRSDOS (Radio Shack Model III & 4) 
"I've had a lot oi experience with different C compilers, 
but the Aztec C80 Compiler and Professional Develop- 
ment System is the best I ve seen." 80-Micro, Decem- 
ber, 1984, John B. Harrell III 

This sylem has most of the features ot AZTEC C II tor 
CP/M. II is perhaps the best software development 
system tor the Radio Shack Model III and IV. 

AZTEC C80 model 3 (no floating point) $149 

AZTEC CaOmodeU (lull) $199 

AZTEC C80/PRO (full for model 3 and 4) $299 

To order or for information call 

800-221-0440 

I201' 530-7997 (NJ ant] outside U S A.I Or write MANX 
SOFTWARE SYSTEMS, PO Box 55. Shrewsbury, M.J 
07701. 



MANX 



TRS 80 RADIO SHACK TRS DOS is a trademark of TANDY 
APPLE DOS MACINTOSH is a trademark ol APPLE 




SHIPPING INFORMATION ■ Standard U.S. 
shipment is UPS ground [no fee). In the U.S. 
one day shipment is $20, two days is $10. 
Canadian shipment is $10. Two days ship- 
ment oulside the U.S. is by courier and is 
freight collect. 



For Technical Support 
(Bug Busters) call: 201-530-6557 
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Sizzling C 



The fastest C.The C that Microsoft 
developed to write its own software 
programs. Hot. 

So hot that we can make this claim: 
Virtually every program runs faster 
with Microsoft 1 C Compiler than with 
any other MS-DOS" C compiler. 

Efficient C. 

We give you everything you need to 
write code so tight your computer will 
scream. 

"Preliminary testing on the Microsoft C 
Compiler produced code that was signi- 
ficantly smaller than that produced by 
other C compilers" 
Paul Springer, Ashton-Tate. 

"We found the FAR pointer very helpful 
for situations where a mix of memory 
models offers the greatest efficiency." 
Robert Frankston, Software Arts. 

"The portability of the code between 
MS-DOS and XENW is great 
Jim Bean, Peachtree Software. 

But it's really no surprise that our C 
stretches your micro to its limits. We 
wrote both the MS-DOS and the 
XENIX operating systems. 



'Purchase both Microsoft C Compiler and Microsoft Macro Assembler 
and get a S25 rebate direct from Microsoft. See package for details. 

Microsoft. MS-DOS and XENIX are registered trademarks and 
The High Performance Software is a trademark of Microsoft Corporation. 



For the name of your nearest Microsoft 
dealer, or to upgrade from Microsoft C 

C %^S2*$£ c MICROSOFT 

Call (800) 426-9400. The High Performance Software 

In Washington State, Alaska, Hawaii 
and Canada, call (206) 828-8088. 
And make your programs really cook. 



Microsoft C Compiler Version 3.0 

Microsoft C Compiler 

• Produces compact code and fast executables. 

* Implements register variables. 

* Small. Medium and Large Memory model Libraries-Mix models 
with NEAR and FAR pointers. 

•Transport source and object code between MS-DOS & XENIX 
operating systems. 

• Library routines implement most of UNIX System V C library 
♦Choose from three Math libraries and generate in-line 8087/287 

instructions or floating point calls. 

-Floating point emulator (utilises the 8087/287 if installed). 
— 8087/287 coprocessor support. 

-Alternate math package— extra speed on svstems without an 
8087/287. 
•Link routines written in Microsoft FORTRAN (V 3.3 or higher), 
Microsoft Pascal IV 3.3 or higherl or Microsoft Macro Assembler 

• Supports MS-DOS pathnames and Input/Output redirection. 
•File sharing and record and file locking is supported. 

• Do source level debugging, with the Symbolic Debug Utility, 
available separately with the Microsoft Macro Assembler Package'' 

Library Manager 

Create, organize and maintain your object module libraries created 

with Microsott languages. 

Object Code Linker 

♦ Simple overlay linker combines relocatable object modules created 
using Microsoft Languages into a single program. 

* Link very large programs (over 1MB, using overlays), 
EXE PACK Utility 

A new utility to compress sequences of identical characters from an 
executable tile and to optimize the relocation table. 
EXEMOD Utility 

A new utility used to modify the fields in the header according to 
the instructions given by the user in the command line. 
'C Benchmarks -done on a Compaq Plus with 512k memory 
with no S087. Program "SIEVE'," with register variables. 

Exec Time Code Size EXE Size 

Microsoft C ;9.39 HI 5,914 

Lattice C : 12.24 164 20|072 
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